Il linguaggio di programmazione Delphi
 

ComboBox su DBGrid non risponde all'evento OnDropDown

Sandra 20 Feb 2017 20:17
Il ComboBox viene visualizzato, ma al DropDown sembra inattivo e legato
al parent sul DbGrid

Se lascio ComboBox.Visible := True
prima di eseguire il parent l'evento OnDropDown scatta sempre.

il DBGrid (standard) e' attivo (Enabled := True)

Qualche idea del motivo ?

^^^^^^^^^^^^

procedure Tfrm_Lingue.grdAviableLangDrawColumnCell(Sender: TObject;
const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if clData_Language.Qry_AllLanguage.RecNo > 0 then
begin
if Column.FieldName = 'DESCRIZIONE' then
begin
if (gdFocused in State) then
begin
grdAviableLang.Canvas.FillRect(Rect);

ComboBox1.Parent := grdAviableLang;
ComboBox1.Color := grdAviableLang.Color;
ComboBox1.Left:= Rect.Left;
ComboBox1.Top:= Rect.Top;
ComboBox1.Width:= Rect.Right-Rect.Left;
ComboBox1.Visible:= True;
ComboBox1.Enabled := True;
end;
end;
end;
end;

procedure Tfrm_Lingue.ComboBox1DropDown(Sender: TObject);
var sLanguage : TStringList;
begin
sLanguage := TStringList.Create; //breakpoint -- qui non passa
clData_Language.Get_Language(sLanguage);
ComboBox1.Items := sLanguage;
end;

Links
Giochi online
Dizionario sinonimi
Leggi e codici
Ricette
Testi
Webmatica
Hosting gratis
   
 

Il linguaggio di programmazione Delphi | Tutti i gruppi | it.comp.lang.delphi | Notizie e discussioni delphi | Delphi Mobile | Servizio di consultazione news.