[Gelöst] Wie verwendet man TEdit.Texthint ?

[kirchfritz]

Hallo,

ich habe heute zum erstenmal entdeckt, dass die Komponente TEdit eine Eigenschaft TextHint besitzt.
Laut EMBARCADERO: TextHint property : "A hint or message to be displayed when the Text property is empty."

Ich habe deshalb eine Tedit-komponente auf meine Lazarusform gelegt und im Form.Create Edit1.text := ''; gesetzt.
Also so:

Code: Alles auswählen

 
procedure TForm1.FormCreate(Sender: TObject);
begin
  Edit1.Text := '';
  Edit1.TextHint:='Bitte Suchbegriff eingeben';
  Edit1.ShowHint := True;
end;
 

Leider bleibt das edit-Feld leer, wenn ich das Programm starte.

Was mache ich falsch?

Fritz
Screenshot : http://screencast.com/t/8fnjDUlZ9wb

[kirchfritz]

Nachtrag:
Die Anwendung startet so: http://screencast.com/t/jVjRRjju8jBn

[MacWomble]

Setze mal versuchsweise den Focus NICHT auf die tEdit. Soweit mir bekannt ist, wird der TextHint ausgeblendet, wenn tEdit den Focus hat.

[Andromeda]

Der Text "Bitte Suchbegriff eingeben" sollte aber erscheinen, wenn Du mit dem Mauszeiger auf das Editfeld zeigst. Und das ist auch der Sinn der Texthint-Eigenschaft.

[wp_xyz]

Nein, TextHint wird ins Edit-Feld eingeblendet, so wie bei einigen Passwort-Dialogen "Passwort eingeben" grau hinterlegt im Edit erscheint, bevor man etwas eingegeben hat. Das was du meinst, ist der "normale" Hint, der zusätzlich zum TextHint existiert und nur kommt, falls ShowHint true ist. TextHint ist dagegen unabhängig von ShowHint.

[kirchfritz]

Superschnelle Antworten! Danke!

Ich habe wie vorgeschlagen ein zweites TEdit Feld eingefügt und diesem im OnFormShow den Focus zugewiesen.
Dann wird auch beim Programmstart der TextHint des ersten TEdits korrekt angezeigt.

Danke! Beitrag gelöst!

Screenshot wie's funktioniert:
http://screencast.com/t/tEULlVzln