Interface .. onchange onscroll

[EWeiss]

Geht leider nicht.
Kann Create nicht nochmals aufrufen da TSkinScrollBar über das Interface erstellt wird.

Delphi-Quellcode:

function CTRL_ScollBarCreate(hOwner: HWND; PageImg, DownImg, UpImg, ThumpImg: WideString; x, y, yH, CtrlID,
  StateMax:Integer; Enabled, Visible: Boolean): ISkinScrollBar; stdcall;
begin

  result := TSkinScrollBar.Create(hOwner, PageImg, DownImg, UpImg, ThumpImg,
    x, y, yH, CtrlID, StateMax, Enabled, Visible);
end;

function CreateTMachWas: TMachwas;

TSkinScrollBar(CreateTMachWas) wäre demnach auch nicht exportierbar.

Und
LVScrollBar.OnChange := ReagiereAufMachwas;

führt unweigerlich zum crash da die LVScrollBar das Interface ist.

Delphi-Quellcode:

LVScrollBar:     ISkinScrollBar;

    LVScrollBar := CTRL_ScollBarCreate(hMain,
      (SKAERO_FOLDER + 'VScroll\' + 'VSPage.png'), (SKAERO_FOLDER + 'VScroll\' + 'VSDown.png'),
      (SKAERO_FOLDER + 'VScroll\' + 'VSUp.png'), (SKAERO_FOLDER + 'VScroll\' + 'VSThump.png'),
      767, 70, 253, ID_VSCROLL, 0, True, True);
    LVScrollBar.SetLargeChange(10);
    LVScrollBar.SetSmallChange(1);
    LVScrollBar.SetMinVal(1);
    LVScrollBar.SetMaxVal(127);
    LVScrollBar.SetVal(1);
    SKAERO_SetAnchorMode(LVScrollBar.Handle, ANCHOR_BOTTOM_RIGHT);
    SKAERO_SetZorder(LVScrollBar.Handle, HWND_TOP);

Hmmm schon wieder ein großes problem!
Es muss doch möglich sein ein Event aus der DLL zu übergeben.

gruss

[geskill]

http://www.delphipraxis.net/149369-p...nterfaces.html

[EWeiss]

Zitat von geskill:

http://www.delphipraxis.net/149369-p...nterfaces.html

Danke für den Link..
Muss aber feststellen das ich mit meinem Interface keine Events weiterleiten kann.
So das ich mich nun für eine Callback entschlossen habe.

gruss

[geskill]

Du willst dein bestehendes Interface nicht verändern oder wie?

[EWeiss]

Zitat von geskill:

Du willst dein bestehendes Interface nicht verändern oder wie?

Wie meinst du das?
Hast du meine Post mal gelesen ?
Vielleicht verstehst du dann warum das nicht funktioniert.

Ich kann keine neue Instanz von TSkinScrollbar erstellen da diese eine ableitung von ISkinScrollbar ist.
Sie wird also schon erstellt beim Aufruf von

CTRL_ScollBarCreate.

Schau mal was als Result zurück geliefert wird.

gruss

[sirius]

Na dann häng doch der Klasse noch ein weiteres Interface an und caste dahin.


Du kannst auch eine komplett eigene Klasse erstellen mit einem eigenen Interaface, dass gibst du dann an die DLL weiter und die Klasse kennt auch dein IScroll-dinsgbums.

[EWeiss]

Zitat von sirius:

Na dann häng doch der Klasse noch ein weiteres Interface an und caste dahin.


Du kannst auch eine komplett eigene Klasse erstellen mit einem eigenen Interaface, dass gibst du dann an die DLL weiter und die Klasse kennt auch dein IScroll-dinsgbums.

Zitat:

So das ich mich nun für eine Callback entschlossen habe.

gruss