Wenn ich nicht gerade neben mir stehe,
dann müsstest du nur die Items anwählen und unter MouseMove den Code schreiben (Statusbar1.SimpleText := 'text'
. Du könntest es auch über eine Funktion bzw. Prozedur lösen, aber da gehe ich jetzt nicht näher drauf ein....
Rot, kursiv = Falsch.... Bitte korrigiert mich