In Windows 9x befindet sich am Ende des Bildschirms die Taskleiste, die Benutzer festlegen können. Wenn Sie mit der rechten Maustaste auf die Taskleiste klicken und Eigenschaften auswählen, können Sie sie im Popup-Dialogfeld festlegen.
HINWEIS: Verwenden Sie FindWindow und SetWindowPOS -API -Funktionen in den folgenden Programmen, um das Versteck und die Anzeige der Windows -Taskleiste im Programm zu steuern.
Erstellen Sie zunächst ein neues Projekt, platzieren Sie eine Taste1 (die Bildunterschrift -Eigenschaft ist die versteckte Taskleiste) und Taste2 (die Bildunterschrifteneigenschaft ist die Anzeige -Taskleiste) im Standardform1, und die anderen Eigenschaften bleiben unverändert und geben dann den folgenden Programmcode ein:
Einheit Startbar;
Schnittstelle
Verwendet Windows, Nachrichten, Systeme, Klassen, Grafiken, Steuerelemente, Formulare, Dialoge, stdctrls;
Typ tform1 = Klasse (tform)
Button1: Tbutton;
Button2: Tbutton;
PROCEDURE Taste1Click (Absender: Tobject);
PROCEDURE Button2Click (Absender: Tobject);
Prozedur Formcreate (Absender: Tobject);
private {private Erklärungen}
public {public deklarations}
Ende;
var form1: tform1;
Implementierung {sr *.dfm}
procedure tform1.formcreate (Absender: tobject);
Beginnen
Ret: = findWindow ('Shell_traywnd', ');
Ende;
procedure tform1.button1click (Absender: Tobject);
Beginnen
SetWindowpos (ret, 0, 0, 0, 0, 0, swp_hidewindow);
Ende;
procedure tform1.button2click (Absender: Tobject);
Beginnen
SetWindowpos (ret, 0, 0, 0, 0, 0, swp_showwindow);
Ende;
Ende.
Jetzt können Sie es ausführen (drücken Sie F9).
Hinweis: Das obige Programm wurde in der chinesischen Version von Windows 98 und Delphi4.0 c/s debugged und übergeben.