Formda nesne oluşturma

[Commandx]

Arkadaşlar arttım taradım hiçbir yerde bulamadım
form üzerinde bir butona basıldığında panel oluşturabilirmiyiz
yada bir butona basıldığında Shape veya edit oluşturulabilirmi
mesela butona tıkladığımda sol üst köşede bir panel oluşsun ama daha önce form üzerinde hiç panel yok
buttona tıklandığında ilk defa oluşsun
ikinci kez tıklandığında onun yanında yapışık halde üçüncü kez tıklandığında ötekinin yanında böyle sıralı halde
yapılabilirmi acaba

[Jire]

ben sadece sana örneği verim gerisini yaparsın umarım.

Kod: Tümünü seç

procedure TForm1.Button1Click(Sender: TObject);
var
  Pnl: TPanel;
begin

Pnl := TPanel.Create(Self);
with Pnl do
begin
Parent := Self;
Width := 100;
Height := 100;
Left := 10;
Top := 10;
Caption := 'Panel';
end;
end;

yada şu dediğin yan yanayı align olarak yapabilirsin.

Kod: Tümünü seç

procedure TForm1.Button1Click(Sender: TObject);
var
  Pnl: TPanel;
begin

Pnl := TPanel.Create(Self);
with Pnl do
begin
Parent := Self;
Width := 100;
Height := 100;
Left := 10;
Top := 10;
Caption := 'Panel';
Align := alLeft;
end;
end;

[unicorn64]

bence yeterince aramamışsın. bu konu forumda bi kaç kez konuşuldu..

mesela...
yada...

[Commandx]

çok sağol ya aramadığım yer kalmadı
Teşekkürler