Einzelnen Beitrag anzeigen

David Martens

Registriert seit: 29. Sep 2003
205 Beiträge
 
Delphi XE Enterprise
 
#3

AW: selbsterstellte Combobox hat (noch) keinere Fehler

  Alt 8. Jun 2010, 14:40
@Alaitoc:

Das verstehe ich nicht ganz:
Zitat:
wobei ich dort den Parent auf den Desktop lege
Ich habe den Parent garnicht gesetzt.

Ich habe insgesamt drei Formulare, da die beiden Suchboxen auch welche sind, die aber neben den Grid stehen.
Bei allen drei Formularen habe ich einfach
Delphi-Quellcode:
procedure TMultiColCheckedComboBox.OnSearchFocusLost(Sender: TObject);
var
  wnd : HWND;
begin
  (Sender as TForm).Close;
  FGrid.Options := FGrid.Options - [goRangeSelect];

  wnd := WindowFromPoint(mouse.CursorPos);

  if (FPrivForm.Visible) and (wnd <> FGrid.Handle) then
  begin
    FPrivForm.Close;
  end;
end;
auf .OnDeactivate gesetzt.


Hier nochmal ein Bild um das andere Problem zu verdeutlichen.
Bei aufgeklapptem Grid ist das Formular "inaktiv".
Das ist bei dir nicht der Fall?
Miniaturansicht angehängter Grafiken
bild.png  
  Mit Zitat antworten Zitat