PDA

View Full Version : A Little problem (Delphi)


BLACKFIRE69
14-02-2020, 04:34
I'm trying to create a new panel using a DLL built with Delphi 10.3.
it works...

But the problem is that when I use a custom type it doesn't work.

So how to do this?

example:

.

Cesar82
14-02-2020, 17:38
It also doesn't work with delphi 2010.

Using procedure works perfectly.

procedure ColorPanelCreate(hParent: HWND; hLeft, hTop, hWidth, hHeight: Integer; out CstmPanel: TCusPanel);

BLACKFIRE69
15-02-2020, 04:27
It also doesn't work with delphi 2010.

Using procedure works perfectly.

procedure ColorPanelCreate(hParent: HWND; hLeft, hTop, hWidth, hHeight: Integer; out CstmPanel: TCusPanel);

Yes! , now it works...

Thax Cesar82!


.

Ele
30-01-2021, 04:09
Hi Mr.BLACKFIRE69,

I'm very new to Delphi but I've done this in a different way. Check out the example. :)


function ButtonCreate(hParent :HWND; hLeft, hTop, hWidth, hHeight: Integer; title: PAnsiChar; titleclr, backcolor, forecolor: integer): longint;
procedure ButtonMouseEnter(Btn: longint; titleclr, backclr, foreclr: integer);
procedure ButtonMouseLeave(Btn: longint; titleclr, backclr, foreclr: integer);
procedure ButtonOnClick(Btn: longint; event: TNotifyEvent);
procedure ButtonDeInit;


Screenshots: