TextRect -> Es gibt keine überladene Version ...

[Tobinator]

Nee, das ist ein Canvas, was von einer Paintbox kommt und über verschiedene Proceduren immer weiter gereicht wird, das dürfte doch aber nichts ändern, oder?

[DeddyH]

Ich habe gerade mal das hier ausprobiert:

Delphi-Quellcode:

procedure TForm1.DoPaint(aCanvas: TCanvas);
var R:TRect;
    s:AnsiString;
    t:TTextFormat;
begin
  s:='asd';
  r:=rect(10,12,130,150);
  T:=[tfCenter];
  aCanvas.TextRect(R,S,[tfCenter]);
end;

procedure TForm1.FormPaint(Sender: TObject);
begin
  DoPaint(Canvas);
end;

Keine Probleme, anscheinend fehlt mir Quelltext. Du könntest das Projekt ja mal zippen und anhängen, vielleicht sieht man da mehr.

[himitsu]

Welches TextRect wird denn angeboten, bzw. was zeigt denn die IDE für mögliche Parametertypen an?

Und sind die Typen auch die Selben?
Nicht daß die Parameter andere Typen verlangen, als deine Variablen es sind.
(gleichnamige Typen aus anderen Units)

[Tobinator]

Also die Parameter stimmen eigentlich, das hab ich mehrmals kontrolliert.
Hier mal das Projekt

[himitsu]

Ab Delphi 2009 will diese Funktion einen String (UnicodeString), aber du übergibst einen AnsiString
und bei einem Var-Parameter muß der Stringtyp genau übereinstimmen.

[Tobinator]

Ah, super, danke, funktioniert perfekt.