lille funktion

edit1.free;
edit2.free;

osv...

der er vel ikke nogen grund til at lave en function til det...

Fjerner den det så helt fra formen ?

ja

Lige nu jeg har dig, kan man så få den til at vise et objekt der ellers er gemt ?? Og kan man gemme det ?

prøv med denne her:

procedure TForm1.Button1Click(Sender: TObject);
begin
if Button2.Visible = true then
  begin
  Button2.Visible := false;
  Label1.Visible := false;
  Label2.Visible := false;
  Edit1.Visible := false;
  Edit2.Visible := false;
  end
  else
  begin
  Button2.Visible := True;
  Label1.Visible := True;
  Label2.Visible := True;
  Edit1.Visible := True;
  Edit2.Visible := True;
  end;
end;

Edit1.visible := not edit1.visible;

Smart - den kendte jeg ikke...

hvor skal jeg så placerer mín
Edit2.Visible := False;

Så man ikke kan se den når programmet starter men så når jeg kører
Edit2.Visible := True;

Så kan man ?

Har fundet ud af det :)

Tak for hjælpen