Delphi Unsichtbares Programm

Thema durchsuchen

Ansicht

Themen-Optionen

Unsichtbares Programm

Ein Thema von Guido Eisenbeis · begonnen am 6. Mai 2008 · letzter Beitrag vom 18. Mai 2008

Vorheriger Beitrag

Nächster Beitrag

himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.361 Beiträge

Delphi 12 Athens

#24

Re: Unsichtbares Programm

7. Mai 2008, 17:36

erstellen eines Message-Only-Windows

markieren

Delphi-Quellcode:

			Var VI: TOSVersionInfo;

  S: String;

VI.OSVersionInfoSize := SizeOf(TOSVersionInfo);

If GetVersionEx(VI) and (VI.MajorVersion >= 5) Then

  S := 'Message' Else 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

Ein Therapeut entspricht 1024 Gigapeut.