Skillnad mellan versioner av "Programmering Lazarus"

Från ElektronikWikin
Hoppa till navigering Hoppa till sök
 
Rad 1: Rad 1:
Åter till [[Programmerning]]
Åter till [[Programmering]]
----
----
Innehåll:<br>
Innehåll:<br>

Nuvarande version från 16 februari 2014 kl. 14.27

Åter till Programmering


Innehåll:
För att visa/dölja en GroupBox med innehåll, utan att använda någon variabel.


procedure TForm1.Button4Click(Sender: TObject);
begin
If GroupBox1.Visible=True then
 Begin
  GroupBox1.Visible:=False;
 end
 Else
 Begin
   GroupBox1.Visible:=True;
 end;
end;