Изначально отметить CheckBox по условию

void __fastcall TForm2::FormCreate(TObject *Sender)
{
DWORD PID = GetProcessByExeName("notepad.exe");
if ( !PID ) {(CheckBox1->State==cbUnchecked);}
else {(CheckBox1->State==cbChecked);}
}
//---------------------------------------------------------------------------
DWORD GetProcessByExeName(char *ExeName)
{
        DWORD Pid;
 
    PROCESSENTRY32 pe32;
        pe32.dwSize = sizeof(PROCESSENTRY32);
 
    HANDLE hProcessSnap = CreateToolhelp32Snapshot(TH32CS_SNAPALL, NULL);
    if( hProcessSnap == INVALID_HANDLE_VALUE)
    {
        MessageBox(NULL, "Error = " + GetLastError() , "Error (GetProcessByExeName)", MB_OK|MB_ICONERROR);
        return false;
    }
 
    if ( Process32First(hProcessSnap, &pe32) )
        {
            do
                {
                    if ( strcmpi(pe32.szExeFile, ExeName) == 0)
                        {
                                CloseHandle(hProcessSnap);
                                return pe32.th32ProcessID;
                        }
                } while ( Process32Next(hProcessSnap, &pe32) );
        }
 
    CloseHandle(hProcessSnap);
        return 0;
}

if ( !PID ) {
(CheckBox1->Checked = false);
} else {
(CheckBox1->Checked = true);
}

if (CheckBox1->Checked) {
        CheckBox1->Checked = false;
} else {
CheckBox1->Checked = true;
}

CheckBox1->Checked = PID;