problem mit canvas

[brutus]

sehr aussagekräftiger titel

also ich hab folgendes problem:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
VAR i,a:integer;
begin
FOR i:=strtoint(edit1.text) TO
(strtoint(edit1.text)+strtoint(edit3.text)) DO
FOR a:=(strtoint(edit2.text)-strtoint(edit4.text)) TO
strtoint(edit2.text)  DO
canvas.pixels[a,i]:=clred;
end;

funktioniert wunderbar.

bloss wenn ich dass fenster minimiere oder ein anderes fenster öffne - also irgendwie die zeichnung überdeckt wird verschwindet sie auf nimmer wiedersehen!!!!

WIESO ? ? ?


<edit>ich hab hier mal nen screenshot von meinem problem rangehangen</edit>

[tyberis]

Das Bild muss neu gezeichnet werden, sobald es überdeckt und wieder angezeigt wird. Sonst wäre ja ein riesen Buffer für jedes Fenster nötig. Deine Zeichnungsroutine fügst du am besten ins OnPaint ein.

[brutus]

ich hab bei formular/eigenschaften onpaint die prozedur button2click eingefügt - wenn jetzt die zeichnung überdeckt wird verschwinden alle bilder bis auf das letzte!
wie erreiche ich es dass ich auf dem formular mehere bilder zeichnen kann ohne dass sie wieder verschwinden?

[Harald]

Du musst die Bilder in Bilder reinzeichnen - oder aber für jedes Bild eine Redraw-Prozedur aufrufen. Die Abarbeitung einzelner Befehle zum Zeichnen speichert das Bild nicht.

Zum Speichern kannst Du JPG oder Bitmaps verwenden, aber sinnvoller (weil bessere Zeichnungsqualität) ist es natürlich, wenn die Bilder jeweils neu gezeichnet werden.

Gruß
Harald

[brutus]

gut danke, schade dass es nicht irgendwie anders geht (mit canvas meine ich)