Zitat von
SirThornberry:
willst du den Text gedreht ausgeben oder oder so:
D
E
I
N
T
E
X
T
Also so wie ich ihn versteh will er ihn "so" ausgeben.
Das machst du halt etwa so:
Delphi-Quellcode:
var S: String;
i: Integer;
begin
S:= 'Hallo';
//Canvas.Brush.Style := bsClear;
for i:= 1 to Length(S) do begin
Canvas.Textout(0,I*16,S[i]);
end;
end;
also so in etwa. Mit den Y-Werten musst du mal rumexperimentieren. Das hängt natürlich auch von der Schriftgröße ab...
EDIT: Also mit Standard-Schriftgröße funktioniert das prima.