Új hozzászólás Aktív témák

• #1405 btotyi tag Rolly #1401

  Új Válasz 2007-01-10 21:17:32 #1405

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  btotyi

  tag

  válasz Rolly #1401 üzenetére

  Tedd rá egy button onclick-re
  
  
  procedure TForm1.Button1Click(Sender: TObject);
  Var i : integer ;
    Button : TButton ;
  begin
    for i := 0 to 9 do
     begin
      Button := TButton.Create(Self);
      Button.Caption := IntToStr(I) + '. gomb';
      Button.Parent := Self;
      Button.Top := i * 26 ;
      Button.Visible := true ;
     end;
  end;
  

Új hozzászólás Aktív témák