Delphi Button tiltása, hogy lehet?
Azt szeretném, hogy ha a ComboBox egy eleme sincs kiválasztva, akkor egy Buttonom tiltva legyen. Megcsináltam, de ha nincs kiválasztva semmi, akkor is engedélyezve van a Button-om.
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if(ComboBox1.ItemIndex <> -1)
then
Button1.Enabled:=true
else Button1.Enabled:=false;
end;
Mi lehet a baj? Vagy valami más módszerrel kell csinálni?
válasza:Szia.
Jó az amit csináltál, de nem hivódik meg, tehát magadnak kell gondoskodni rólla, hogy meghivódjon :
Kérdés az, hogy mikor, álltalában amikor elkészül a form.
Tehát a formCreate-hoz tedd be a hivást és akkor jó lesz :
procedure TForm1.FormCreate(Sender: TObject);
begin
{... egyébb kód
...}
Form1.ComboBox1Change(Sender);
{...
...
...
... egyébb kód }
end;
Még egy Tipp :
Milyen A "ComboBox1.Style" Properties-se ?
Ha "csDropDown", akkor érdemesebb a Szöveget figyelni és
"if(ComboBox1.ItemIndex <> -1)" helyett "if (length (Form1.ComboBox1.Text)>0)" irni, mert akkor ha kitörlöd a szöveget akkor a gomb is deaktiválódik.
Sok sikert.
Üdv.
Kapcsolódó kérdések:
Minden jog fenntartva © 2025, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!