Forum: Multimedia
Delphi
by mimi,
22. Aug 2004
vielen dank !!! es hat funktioniert !
das ist nur ein Test projekt, das werde ich später eine eigene klasse erstellen die optimiert und geordnet sein soll :-D
Forum: Multimedia
Delphi
by mimi,
22. Aug 2004
Hallo,
ich habe mehre objekte auf meinem canvas gezeichnet das mache ich so:
procedure TForm1.Timer1Timer(Sender: TObject);
var
i:Integer;
begin
StatusBar1.Panels.Text:=IntToStr(ObjIndex) + '\' + IntToStr(TempObjIndex);
Bit.Canvas.Rectangle(0,0,PaintBox1.Width,PaintBox1.Height);;
for i:=0 to High(Obj) do begin