Kann es vielleicht einfach sein, dass dein Image zu klein ist? Oder die Farbe des Stifts auf Weiss gesetzt wurde?
Der Code funktioniert so.
Delphi-Quellcode:
var x:integer;
var y:integer;
var Breite:integer;
var Hoehe:integer;
Du musst var nicht vor jede Zeile schreiben. So reicht es völlig:
Delphi-Quellcode:
var x:integer;
y:integer;
Breite:integer;
Hoehe:integer;
begin;
...
Zitat:
(caption: RANDOM PAINT!)
Wichtige Info
Erwarte das Beste und bereite dich auf das Schlimmste vor.