Forum: Multimedia
Delphi
by any_key,
25. Jul 2006
ah danke
(hatte die schleife von irgendwo anders übernommen weil ich nicht mehr genau wusste wie es ging...)
jetzt klappt es zwar aber was ich eigentlich erreichen wollte klappt noch nicht ganz
undzwar wollte ich das so machen das sich das quadrat nach und nach vergrößert
also nach jedem schleifendurchgang kurz warten, dann das vorher gemalte wieder löschen und ein etwas größeres quadrat...
Forum: Multimedia
Delphi
by any_key,
25. Jul 2006
aHoyHoy
bin gerade mal auf die komische idee gekommen ein quadrat verändern zu wollen... das ich mit canvas male
eigentlich sollte es sich auch vergrößern aber irgendwie funzt das nicht
procedure TForm1.Button1Click(Sender: TObject);
var
position1:integer;
i:integer;
begin
position1:=5;