
	Kezdőlap Cikkek Tallózó Cikksorozatok Összes cikk Fórum Fórum kezdőlap Archívum Hírlevél Letöltés Állás, munka Webszolgáltatás Megtekintés Aktuális TV műsor TV csatornák listája Könyvek Software Offline évkönyvek Delphi 1999 Delphi 2000 Delphi 2001 Delphi 2002 Delphi 2003 Visual Studio.NET C# 2001 Visual Studio.NET C# 2002 Visual Studio.NET C# 2003 Windows 2001 Windows 2002 Windows 2003 Havilapok Keresés Oldaltérkép Impresszum

Bejelentkezés

E-mail:
Jelszó:

| Regisztráció | Jelszó? |

Fut-e a Delphi?

Példaprogram letöltése

5103 bájt

Ha valamilyen okból kifolyólag szükségünk van arra az információra, hogy a Delphi éppen fut-e, vagy sem, akkor azt programból is lekérdezhetjük. Ennek legegyszerűbb módjáról szól ez a cikk.

Ehhez mindössze annyit kell tudnunk, hogy mi a Delphi Form osztályának a neve. A FindWindow függvénnyel rákeresünk erre a névre, és ha a visszatérési értéke nem 0, akkor a Delphi fut. A FindWindow függvény első paramétere a keresett Form osztály neve, a második paraméter pedig a Form neve. Egyszerre csak az egyiket kell megadnunk, ezért első paraméterként megadjuk az osztály nevét, ami "TAppBuilder", a második paraméterként pedig nil-t adunk meg.

procedure TForm1.FormCreate(Sender: TObject);
begin
  if FindWindow('TAppBuilder', nil)<>0 then
    Label1.Caption:='A Delphi fut!'
  else
    Label1.Caption:='A Delphi NEM fut!';
end;

Cikksorozat

#ID	Kategória	Cikk címe	Sorozat
3333	Windows	Net Shell parancsok	1. rész
3367	Windows	Net Shell parancsok	2. rész
3396	Windows	Net Shell parancsok	3. rész

Könyv

Ez a cikk megtalálható ebben a könyvben: Delphi Software Offline 2001 évkönyv 322. oldal

Felhasználási feltételek

A Software Online szoftverfejlesztői magazin mindegyik cikke, minden megjelent képe, és egyéb publikált anyaga szerzői jog védelme alatt áll! Bármilyen formában történő másodlagos terjesztésük, közzétételük vagy felhasználásuk kizárólag a kiadó előzetes írásbeli engedélyével történhet!