Thema: Delphi Unsichtbares Programm

Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
 
Delphi 12 Athens
 
#24

Re: Unsichtbares Programm

  Alt 7. Mai 2008, 18:36
erstellen eines Message-Only-Windows
Delphi-Quellcode:
Var VI: TOSVersionInfo;
  S: String;

VI.OSVersionInfoSize := SizeOf(TOSVersionInfo);
If GetVersionEx(VI) and (VI.MajorVersion >= 5) Then
  S := 'MessageElse S := 'STATIC';
MessageWindow := CreateWindowExA(0, PChar(S), nil,
  WS_POPUP, 0, 0, 0, 0, 0, 0, GetCurrentProcessID, nil);
Quelle: MSDN > About Window Classes



alternativ kann man auch eines erstellen, indem man einfach ein neues Window (STATIC) erstellt und ihm als Parent ein anderes Message-Only-Window verpaßt
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat