![]() |
Re: Problem mit Buttons
und wo füge ich das ein?
(ERLEDIGT) |
Re: Problem mit Buttons
Sobald du die Überprüfung haben willst. Also entweder am Anfang oder Mittendrin auf Knopfdruck oder in einem Timer wenn es ständig überprüft werden soll.
|
Re: Problem mit Buttons
Zitat:
|
Re: Problem mit Buttons
Zitat:
|
Re: Problem mit Buttons
tut mir leid.. ICH hab EUCH falsch verstanden weil ich falsch/zu schnell gelsen habe..
eine sache noch: kann man einen button enabled := false machen nachdem klick? |
Re: Problem mit Buttons
ja das geht, du musst nur im OnClick des Buttons schreiben
Delphi-Quellcode:
dann wird der button disabled wenn man auf ihn draufklickt
Button1.Enabled := false;
|
Re: Problem mit Buttons
wie geht denn das schonwieder :'(
wo muss ich OnClick schreiben? sry.. |
Re: Problem mit Buttons
dadrum gehts:
procedure TForm2.Button2Click(Sender: TObject); begin SetWindowLong(Button1.Handle, GWL_STYLE,GetWindowLong(Button1.Handle, GWL_STYLE) or BS_MULTILINE); Button1.Enabled := DirectoryExists('C:\... mein pfad'); if Button1.Enabled = True then Button1.Caption := 'OK!' else Button1.Caption := 'nicht ok'; end; |
Re: Problem mit Buttons
geh in den ObjektInspector dort findest du einen Reiter für die Eigenschaften und einen Reiter für die Ereignisse
geh auf den Reites des Ereignisses und mach einen doppelclick auf OnClick (in dem weissen feld) [Edit] Frage: wenn du schon ein OnClickEreignis für den Button2 hast, wieso weisst du dann nicht wie man ein OnClick Ereignis für den Button1 macht? [Edit 2.] Und wenn du einen Code darstellen willst, dann verwende bitte die Delphi-Tags :dp: |
Re: Problem mit Buttons
ich hab das so:
button1 ist solange nicht enabled solange man nicht auf button2 geklickt hat. bei OnClick kann ich nur button1 und button2 auswählen. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:50 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz