FileForums - A Little problem (Delphi)

FileForums (https://fileforums.com/index.php)

- Conversion Tutorials (https://fileforums.com/forumdisplay.php?f=55)

- - A Little problem (Delphi) (https://fileforums.com/showthread.php?t=103339)

BLACKFIRE69

14-02-2020 04:34

A Little problem (Delphi)

1 Attachment(s)

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.

Code:

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

BLACKFIRE69

15-02-2020 04:27

Quote:

Originally Posted by Cesar82 (Post 484621)

It also doesn't work with delphi 2010.

Using procedure works perfectly.

Code:

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

Yes! , now it works...

Thax Cesar82!

.

Ele	30-01-2021 04:09

2 Attachment(s)

Hi Mr.BLACKFIRE69,

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

Quote:

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:

All times are GMT -7. The time now is 12:03.