Startbutton aktivieren/deaktivieren

[PierreB]

Moin,

ich benutze folgenden Code aus dem Easy Helper um den Startbutton (Windows) zu deaktivieren:

Delphi-Quellcode:

procedure SetStartBtnEnabled(const AEnabled: Boolean);
begin
  EnableWindow(FindWindowEx(FindWindow('Shell_TrayWnd',nil), 
                            0,
                            'Button',
                            nil),
               AEnabled);
end;

Das funktioniert auch so wie es sollte. Nur jetzt möchte ich das der Startbutton wieder aktiviert wird. Im Easy Helper steht das das erst wieder nach einem Systemneustart zurückgesetzt wird. Gibt es eine andere Möglichkeit den Startbutton wieder zu aktivieren ?

Thx

[JasonDX]

normalerweise sollte

Delphi-Quellcode:

SetStartBtnEnabled(true);

deinen Wünschen nachkommen :gruebel:

[PierreB]

Zitat:

Zitat von Chimaira

normalerweise sollte

Delphi-Quellcode:

SetStartBtnEnabled(true);

deinen Wünschen nachkommen :gruebel:

Ähm damit wird der Startbutton deaktiviert.

Und mit

Delphi-Quellcode:

SetStartBtnEnabled(false)

wird er aber nicht wieder aktiviert.

?

[alcaeus]

Hallo Pierre,

Das Ergebnis ist wie erwartet: SetStartBtnEnabled(True) aktiviert den Startbutton, SetStartBtnEnabled(False) deaktiviert ihn. Getestet auf WinXP SP1

Greetz
alcaeus

[freak4fun]

Hallo :hi:,
bei mir funktioniert es auch. (Win2000, SP4)

Aber warum sollte man den StartButton deaktivieren? :gruebel:

MfG
freak

[DP-Maintenance]

Dieses Thema wurde von "alcaeus" von "Sonstige Fragen zu Delphi" nach "Windows API / MS.NET Framework API" verschoben.
Ich geb dem Thema mal einen dezenten Schubs. Hat wohl mehr mit der WinAPI zu tun ;)

[PierreB]

Zitat:

Zitat von alcaeus

Hallo Pierre,

Das Ergebnis ist wie erwartet: SetStartBtnEnabled(True) aktiviert den Startbutton, SetStartBtnEnabled(False) deaktiviert ihn. Getestet auf WinXP SP1

Greetz
alcaeus

Ah stimmt jetzt geht es, dankeschön. :-)

[Marphy]

Hallo zusammen,

Zitat:

Zitat von PierreB

Delphi-Quellcode:

procedure SetStartBtnEnabled(const AEnabled: Boolean {<---} );

Doofe Frage, die auch nicht wirklich hierher passt, aber bei der gelegenheit stell ich sie trotzdem :stupid: :mrgreen:
Warum wird ein Boolean-Parameter als const übergeben?! Das macht (performance- & ressourcenmäßig) vielleicht bei Strings einen Sinn, aber doch nicht bei einem Boolean (nur 2 Byte, ein Pointer hat 4 Byte!)oder auch einem Integer (4 Byte <-> 4 Byte Pointer)... ?!

Gruß + Dank, Marco

[alcaeus]

Hallo Marco,

das Schluesselwort const wird verwendet, um dem Programmierer der die Routine verwendet zu zeigen, dass ganz bestimmt nichts an der Variable geaendert wird. AFAIR laesst Delphi in dem Fall keine Zuweisung an die Variable innerhalb der Funktion zu. Bei einer "normalen" Uebergabe [Foo(bar: Integer)] ist dies nicht der Fall.

Greetz
alcaeus

[ste_ett]

Delphi braucht dann auch keinen Speicher, um eine Kopie des übergebenen Strings bereitzustellen, da dieser nicht geändert werden kann.