Verstecken von Anwendungen


So blenden Sie eine Delphi-Anwendung.
Programm 'Project1';
verwendet
Formen,
UNIT1 in 'Unit1.pas' {Form1},
Windows;
{$R *. RES}
Deklarieren Sie ein Var aktuelle Fenster-Informationen abrufen
var
ExtendedStyle: Integer;
beginnen
Application.Initialize;
Die erweiterte Stile der Anwendung, übergeben Sie beim Abrufen ihrer
Handle für GetWindowLong
ExtendedStyle: = GetWindowLong (Application.Handle, GWL_EXSTYLE);
Nun legen Sie den Extended-Stil auf diese Weise ein wenig Maskierung Betrieb.
ODER in den WS_EX_TOOLWINDOW Bit und und und das bisschen WS_EXAPPWINDOW
Konvertiert die Anwendung effektiv von einem App-Fenster zu einem
Toolfenster.
SetWindowLong (Application.Handle, GWL_EXSTYLE, ExtendedStyle OR WS_EX_TOOLWINDOW
UND NICHT WS_EX_APPWINDOW);
Application.CreateForm (TForm1, Form1);
Application.Run;
Ende.









Verstecken von Anwendungen


Verstecken von Anwendungen : Mehreren tausend Tipps, um Ihr Leben einfacher machen.


So blenden Sie eine Delphi-Anwendung.
Programm 'Project1';
verwendet
Formen,
UNIT1 in 'Unit1.pas' {Form1},
Windows;
{$R *. RES}
Deklarieren Sie ein Var aktuelle Fenster-Informationen abrufen
var
ExtendedStyle: Integer;
beginnen
Application.Initialize;
Die erweiterte Stile der Anwendung, übergeben Sie beim Abrufen ihrer
Handle für GetWindowLong
ExtendedStyle: = GetWindowLong (Application.Handle, GWL_EXSTYLE);
Nun legen Sie den Extended-Stil auf diese Weise ein wenig Maskierung Betrieb.
ODER in den WS_EX_TOOLWINDOW Bit und und und das bisschen WS_EXAPPWINDOW
Konvertiert die Anwendung effektiv von einem App-Fenster zu einem
Toolfenster.
SetWindowLong (Application.Handle, GWL_EXSTYLE, ExtendedStyle OR WS_EX_TOOLWINDOW
UND NICHT WS_EX_APPWINDOW);
Application.CreateForm (TForm1, Form1);
Application.Run;
Ende.


Verstecken von Anwendungen

Verstecken von Anwendungen : Mehreren tausend Tipps, um Ihr Leben einfacher machen.
Verstecken von Anwendungen
Wiezutun
Freunden empfehlen
  • gplus
  • pinterest

Kommentar

Einen Kommentar hinterlassen

Wertung