🚀 go-pugleaf

"Remy Lebeau (TeamB)" <no.spam@no.spam.com> schrieb im
 Newsbeitrag news:419e5ecc$1@newsgroups.borland.com...

> You reintroduced the same bug that I already told you about earlier.  Use
> the '&' operator instead of the '&&' operator.
>
>
> Gambit


sorry the && to & was a Copy 'n Paste mistake..

it stills wired...

now i get only 2 windows and they are in the SystemTray NOT
in the TaskBar...what do i do again wrong ?

/*******************************************************/
BOOL CALLBACK EnumWindowsCallback(HWND hwnd, LPARAM lParam)
{
   TfrmTrashHate *form=(TfrmTrashHate*)lParam;
   return form->Count_TaskBarWindows(hwnd);
}

bool __fastcall TfrmTrashHate::Count_TaskBarWindows(HWND hwnd)
{
   char Count[256];

   if(chkTaskbar->Checked)
   {
      if(GetWindowLong(hwnd, GWL_EXSTYLE) & WS_EX_APPWINDOW)
      {
        GetWindowText(hwnd, Count, 256);
        AnsiString str = Count;
        if(str.IsEmpty()) return true;
        lstAktiveFenster->Items->Add(AnsiString(str));
      }
   }
   else
   {
     GetWindowText(hwnd, Count, 256); AnsiString str = Count;
     if(str.IsEmpty()) return true;
     lstAktiveFenster->Items->Add(AnsiString(str));
   }
   return true;
}

void __fastcall TfrmTrashHate::cmdRefreshClick(TObject *Sender)
{
   lstAktiveFenster->Clear();
   EnumWindows((WNDENUMPROC)EnumWindowsCallback,(LONG)this);
   lblCount_Process->Caption = "Es wurden: " +
IntToStr(lstAktiveFenster->Items->Count) + " aktive Programme/Prozesse
gefunden.";
}
/*******************************************************/


Oren