PHP DM Gate v0.9 » TPopupDataGridEh > DBLookupComboboxEh <span class="vd">[D7]</span>

Layner9 (17.02.10 10:41) [0]

Здравствуйте!
Есть DBLookupComboboxEh, созданный в рунтайме.
1. Обрабатываю DBLookupComboboxEhDropDownBoxGetCellParams для расскраски
2. Но в Sender от EhDropDownBoxGetCellParams есть приходит TPopupDataGridEh!
3. Не могу достучаться до своего DBLookupComboboxEh, чтобы выяснить что за DataSource привязана к DBLookupComboboxEh

по идее бы так вот надо, но это ес-но не прокатывает:

procedure Tfmain.DBLookupComboboxEhDropDownBoxGetCellParams(
Sender: TObject; Column: TColumnEh; AFont: TFont; var Background: TColor;
State: TGridDrawState);
var
a: variant;
begin
if (sender as TDBLookupComboboxEh).DataSource.DataSet.FieldValues['Color']<>null then
Background:=(Sender as TDBLookupComboboxEh).DataSource.DataSet.FieldValues['Color'];
end;

<Цитата>
Layner9 (17.02.10 10:43) [1]

procedure Tfmain.DBLookupComboboxEhDropDownBoxGetCellParams(
Sender: TObject; Column: TColumnEh; AFont: TFont; var Background: TColor;
State: TGridDrawState);
var
a: variant;
begin
//тут вместо TDBLookupComboboxEh приходит TPopupDataGridEh, а как с ним работать, как дойти до TDBLookupComboboxEh и узнать, какой же TDBLookupComboboxEh кликнул юзер
if (sender as TDBLookupComboboxEh).DataSource.DataSet.FieldValues['Color']<>null then
Background:=(Sender as TDBLookupComboboxEh).DataSource.DataSet.FieldValues['Color'];
end;

<Цитата>
Layner9 (17.02.10 10:46) [2]

вернее не так, не "кликнул юзер", а узнать какой DBLookupComboboxEh с каким DataSource / ListSource работает...

сложно все возможно :(

<Цитата>