Hi
Ich stehe gerade voll auf dem Schlauch
Wie kann ich meine GroupBox1 voll mit BitButtons machen?
geht das nicht so irgendwie:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
for i:=0 to 10 do
begin
with MyBitBtn.Create(GroupBox1) do
begin
Width:=25;
Height:=25;
Left:=i*25;
end;
end;
end;
Nur irgendwie passiert nichts
Hoffentlich kann mir jemand helfen
Spiderpig
PS:
hier noch der rest falls der weiterhilft:
Delphi-Quellcode:
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Buttons;
type
MyBitBtn=class(TBitBtn);
TForm1 = class(TForm)
GroupBox1: TGroupBox;
procedure FormCreate(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
mö