Mam pytanko odnośnie poniższej konstrukcji. To co przedstawiłem jest proste co prawda. Nie wprowadzałem
dodatkowych udziwnień, bo wiadomo ze szerokość moze być zależna od tego co "może być" na formie.
Szerokość w rozumieniu - ta którą uzyskuje poprzez zastosowanie pętli.
Czy mozna tą 'konstrukcję' przedstawić jeszcze prościej? :)
Mniej więcej:
Forma -> Width:460, Height:460
Button --> gdzieś tam blisko lewej krawędzi.
Zaznaczam ze jestem nowicjusz od 3 tygodni - więc czasami moge coś namieszać :))
procedure TForm2.FormCreate(Sender: TObject);
begin
Form1.ClientWidth:= 350;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
i : Integer;
begin
if form1.ClientWidth=350 then
begin
button1.Caption:= '';
Form1.ClientWidth:=form1.ClientWidth-1;
end;
end;
Thx
[cya]