Paintbox- Text schreiben

[Dunkelbunt27]

Delphi-Quellcode:

var
Schrift: String;
Begin
  Schrift:='Hallo Welt';  
  PaintBox1.Canvas.Textout(0,0,Schrift); 
end;

Ergebnis: Überraschenderweise... Nichts...

PS: Das hatte ich vorher auch schoneinmal probiert. Ich werd es aber umgedreht lassen also:

Delphi-Quellcode:

var
Schrift: String;
Begin
  Schrift:='Hallo Welt';  
  PaintBox1.Canvas.Textout(0,0,Schrift); 
end;

ist logischer. Leider trotzdem nicht die Lösung.

EDIT:
So sieht jetzt die Prozedur aus:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var  Schrift: string;
begin
// Paintbox erstellen
PaintBox1:=TPaintbox.Create(self);
PaintBox1.Parent:=Schreibblatt;
// Paintbox weiß färben
Form1.Panel1.Color := clwhite;
// Schreibversuch
Schrift:= 'Hallo Welt';
Form1.PaintBox1.canvas.TextOut(10,10,Schrift);
end;