Komponenty, CheckBox i Edit

0

No więc tak: [hurra]

Mam w programiku komponent CheckBox i od jego stanu ( zaznaczony, odznaczony) ma zależeć czy komponen np. Button będzie aktywny ( eanbled ), wiem jak to zrobić, ale jak zrobić żeby Od razu po zaznaczeniu CheckBox'a był aktywny, że by nie trzaba było naciskac wmiędzy czasie jakiegoś przycisku który akceptuje zmiany, dokładniej chodzi mi o to w którym miejscu mam wpisać kod żeby wszystko ładnie chodziło.

  1. Jak zrobić aby w komponencie Edit można było wpisywać same cyfry i kropki? [stuk]

Dzięki wszystkim za odpowiedź!!! [browar]

0
  1. wstaw to do OnClick CheckBoxa:
    procedure TForm1.CheckBox1Click(Sender: TObject);
    begin
    Button1.Enabled:=CheckBox1.Checked;
    end;

  2. ogranicz przez OnKeyPress lub OnKeyDown albo uzyj MaskEdit. To bylo wiele razy na forum

0

procedure TForm1.CBoxClick(Sender: TObject);
begin
if (CBox.Checked = True) then
begin
Button.Enabled:= True;
end
else
begin
Button.Enabled:= False;
end;
end;

[dopisane]
o kilka sekund sie spoznilem... :-8

0

if (CBox.Checked = True) then

zenek, taka mala uwaga co do przejżystości kodu. Pamiętaj wartość checked jest typu boolean, tzn, zawsze przyjmuje true lub false, więc nie trzeba pisać {if costam.Checked = True then }, wystarczy samo {if costam.Checked then }

pozdrawiam!

1 użytkowników online, w tym zalogowanych: 0, gości: 1