Hi,
es gibt da ein zwei Dinge zu sagen.
Das Füllen einer Fläche geschieht immer mit dem Pinsel, nicht dem Stift. Bei Rect wird zwar der Rahmen mit dem Stift gezeichnet, so wird trotzdem zum Füllen der Fläche der Pinsel verwendet.
Zitat von
qb-tim:
PS.: Ich habe mir schon mehrere Befehle zum Flächenausfüllen angesehen aber nicht verstanden wie ich sie anwenden soll. Eine vervollständigung des folgenden Quellentextes wäre am hilfreichesten...
Entschuldige, aber welche hast du dir angeschaut und was genau verstehst du denn da nicht?
Zitat von
qb-tim:
Delphi-Quellcode:
procedure TForm1.FormActivate(Sender: TObject);
begin
Background := TImage.Create;
Background.Parent(Form1);
Background.Height := Form1.Height;
Background.Width := Form1.Width;
end;
Dies ist keine schöne Möglichkeit, da du mit jedem Form.Activate ein neues TImage anlegst ohne das alte frei zu geben. Viel besser ist es, ein einfaches TImage zu verwenden, dass fest am Form verankert ist und in deiner Methode mit einem TBitmap zu arbeiten (dass du nur in der Methode anlegst und wieder frei gibst).
Gruß Der Unwissende