Procedura warunkowa

0

Czy mogłby ktos napisac kod (a w zasadzie zmodyfikować mój) tak aby dodatkowo po pokazaniu sie formy komponent "poka1" był enabled:=false a przy ukrywaniu stawał sie True.

if not form2.visible then form2.show
else form2.Hide;

Za pomoc z gory dziekuje.

0

if not form2.Visible then
begin
form2.Show;
poka1.Enabled := False;
end else
begin
form2.Hide;
poka1.Enabled := True;
end;

mam nadzieje ze o to Ci chodzilo. powodzenia

0

Dzieki, działa elegancko ;)

0

Nie byłbym sobą, gdybym lekko tego nie zoptymalizował:

Form2.Visible := not Form2.Visible; //Działa jak Form2.Show i Hide
Poka1.Enabled := not Poka1.Enabled; //Tutaj warunek, że na początku Poka1.Enabled musi być Poka1.Enabled := Form2.Visible; Czyli np. przy pierwszym pokazaniu formy zainicjalizować na True.

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