Zitat von
DataCool:
@Mirage:
Auch interessant zu wissen, aber kürzen muss ich den String dort selber.
Das stimmt, wobei Du z.B. für Dateinamen "MinimizeName" aus der FileCtrl
Unit nehmen kannst:
Delphi-Quellcode:
if TargetCanvas.TextWidth(S) > TextSpace then
begin
Result := MinimizeName(S, TargetCanvas, TextSpace);
Done := True;
end;
Viele Grüße