Einzelnen Beitrag anzeigen

Benutzerbild von toms
toms
(CodeLib-Manager)

Registriert seit: 10. Jun 2002
4.648 Beiträge
 
Delphi XE Professional
 
#78

Re: BirthdayRemember

  Alt 9. Nov 2004, 18:11
Es ist mir noch was aufgefallen:

Ich habe das BR Setup ausführt und diese Meldung ist erschienen:
Zitat:
BirthdayRemember läuft gerade. Bitte beenden Sie BirthdayRemember, bevor Sie das Setup starten.
Nun, der BR läuft aber nicht. Es ist nur eine Explorer Instanz mit dem Ordner BirthdayRemember offen.
Du machst wohl eine solche Prüfung:

Code:
If FindWindow(nil, 'BirthdayRemember') <> 0 then
  // BR läuft
else
  // BR läuft nicht
Aber besser ist es so:

Code:
If FindWindow('TfMain', 'BirthdayRemember') <> 0 then
  // BR läuft
else
  // BR läuft nicht
Thomas
  Mit Zitat antworten Zitat