sorry push..
Bei der Übergabe der Combobox direkt funktioniert es aber ich will alle gleichzeitig verarbeiten können.
Warum geht das nicht?
Das will ich vermeiden
Delphi-Quellcode:
ComboHook := HookedCombo_Create;
if assigned(ComboHook) then
begin
ComboHook.ComboImg := ScrbMemoHook.CreateImageFromFile(FilePath + 'ScrollBarSkin\Combo.png');
ComboHook.FrameColor := $FCAC65;
ComboHook.FrameHighLite := $FFE9D6;
ComboHook.SetComboParentObj(ComboBox1);
ComboHook.Connect;
end;
ComboHook2 := HookedCombo_Create;
if assigned(ComboHook2) then
begin
ComboHook2.ComboImg := ScrbMemoHook.CreateImageFromFile(FilePath + 'ScrollBarSkin\Combo.png');
ComboHook2.FrameColor := $FCAC65;
ComboHook2.FrameHighLite := $FFE9D6;
ComboHook2.SetComboParentObj(ComboBox2);
ComboHook2.Connect;
end;
und an stelle dessen!
Delphi-Quellcode:
ComboHook := HookedCombo_Create;
if assigned(ComboHook) then
begin
ComboHook.ComboImg := ScrbMemoHook.CreateImageFromFile(FilePath + 'ScrollBarSkin\Combo.png');
ComboHook.FrameColor := $FCAC65;
ComboHook.FrameHighLite := $FFE9D6;
ComboHook.SetComboParentObj(self);
ComboHook.Connect;
end;
verwenden um alle Comboboxen der Anwendung innerhalb der
DLL zu enumerieren/verwalten..