Hallo zusammen
Ich habe hier ein kleines Problem mit einer TComboBox:
Die Combobox ist mit Einträgen gefüllt, von denen der Anwender einen auswählen kann. Wird ein Text eingegeben, wird der Inhalt der Combobox nach dieser Eingabe gefiltert.
Nach Abschluss des Filterns setzt ich
TComboBox.DroppedDown := True
, um die Einträge passend zu der Eingabe anzuzeigen. Dabei verschwindet der Mauszeiger und erscheint erst wieder, wenn die Auswahlliste geschlossen wird.
Weiß jemand, wie ich dies verhindere oder den Mauszeiger nach dem Setzen von DroppedDown wieder einblenden kann?
Ein bisschen Code:
Delphi-Quellcode:
TForm.ComboBoxKeyPress(Sender: TObject;
var Key: Char);
begin
if (...)
then
//Behandlung Enter, Tab, Pfeiltasten
else
PostMessage(
Handle, WM_MYMESSAGE, 0, 0);
end;
procedure TForm.MyMessageProcedure(
var Msg:
Message);
begin
if EnteredText = '
'
then
//Liste neu füllen
else
begin
//Liste filtern
ComboBox.DroppedDown := True;
end;
end;