Forum: Object-Pascal / Delphi-Language
Delphi
by Pfoto,
17. Jan 2007
Danke Bernie!
ich hatte mir parallel dazu gerade etwas eigenes gebastelt
(ähnlich aufgabaut wie "MinimizeName" von Borland):
function MinimizeNameEllipses(const aCaption: string; aCanvas: TCanvas; aMaxLen: Integer): string;
begin
Result := aCaption;
aMaxLen:= aMaxLen - aCanvas.TextWidth('...');
Forum: Object-Pascal / Delphi-Language
Delphi
by Pfoto,
17. Jan 2007
@Sakura:
Wie oben schon erwähnt, sind die bei Delphi7 im Label noch nich integriert
Aber selbst wenn, ich benutze Skin-Komponenten, die es ebenfalls nicht haben,
deshalb die Suche nach einer reinen Funktion.
@Lun:
Ich wollte es eigentlich von der Länge eines Canvas abhängig machen
und nicht bloß von der Länge der Zeichen.