@Skiron:
Vielen Dank, dass du so schnell geantwortet hast! Irgendwie funzt das mit dem minimieren nicht ganz oder es liegt an etwas ganz anderem!? Ich hab nämlich erst vor kurzem angefangen, zu programmieren. Ich schick einfach mal den Code:
Delphi-Quellcode:
var hWnd: DWORD;
procedure TForm1.FormCreate(Sender: TObject);
begin
application.Minimize;
hWnd:=GetNextWindow(hWnd, GW_HWNDNEXT);
application.Restore;
end;
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key=VK_F10
then SendMessage(hWnd, WS_EX_TOPMOST, 0, 0);
end;
Ich hab keine Ahnung, was falsch sein könnte(bin ja auch noch nicht so erfahren
)!
Ich freue mich über Antworten
S2B
[edit=r_kerber]Delphi-Tags eingefügt. Mfg, r_kerber[/edit]