Statusbar længde

Det gør du i object inspectoren:
Højre klik på status baren og vælg Panels Editor.
Marker panel(0) i "edit panel" vinduet og sæt så bredden i Object Inspectoren.

Eller du mente måske så den automatisk sætter bredden?

Indsæt denne linie efter du har sat teksten på Panel[0] for at sætte bredden så den passer til teksten:

Statusbar1.Panels[0].Width:=Statusbar1.Canvas.TextWidth(Statusbar1.Panels[0].Text)+5;

Jeg havde mere tænke på om den ikke kunne skrive ... hvis der vare mere tekste end den kunne vise ... alla :

hejdetteerentest.... istendet for bare at skrive hejdetteerentest også slutte der ?

Det tror jeg ikke, det skal du nok gøre manuelt.

Jeg ved ikke om det er den bedste måde at gøre det på, men det er da muligt, at lave en løkke, hvor du hele tiden trækker 1 tegn fra din string, indtil den er kort nok (husk at tage hensyn til de tre punktummer) eks:
Repeat Setlength(Statusbar1.Panels[0].Text, Length(Statusbar1.Panels[0].Text)-1)
until Statusbar1.Canvas.TextWidth(Statusbar1.Panels[0].Text) < "Den længde din tekst nu må være (minus de 3 punktummer);
Eller noget i den stil.. ;)

Håber det er en hjælp

Og så self ligge de 3 punktummer til bagefter:

Statusbar1.Panels[0].Text:=Statusbar1.Panels[0].Text+'...';