[ErmandoFerrari]

DONE!!!

in reply to: inherit from TsPanel #42364

[ErmandoFerrari]

of course is a link error, that mean that the function is defined (in header) but not implemented in library
I haven't experience with delphi but having a look in sPanel.pas I havn't find the implementation of that functions… look like the “pure virtual” functions in C++

For now I have implemented the functions in my inherited class:

class PACKAGE TMyPanel : public TsPanel
{
…
protected:
virtual void __fastcall PaintWindow(void* hdc){TPanel::PaintWindow(hdc);};
virtual void __fastcall OurPaint(void *hdc,bool){TPanel::PaintWindow(hdc);};
virtual void __fastcall WriteText(const Types::TRect &R, Graphics::TCanvas* aCanvas = (Graphics::TCanvas*)(0x0), HDC aDC = (HDC)(0x0)){};
…
}

it's work, but my panel don't skin…

My task is to create a component that “aggregate” other control ( a button, a treeview and a memo) into a single component, so I derived a TsPanel and dynamically create the tree components inside it. If you have a better idea for a base class other than TsPanel (possibly transparent) my problem it solved

in reply to: inherit from TsPanel #42334

[ErmandoFerrari]

I am using BCB6

[ErmandoFerrari]

QUOTE (Support @ Jul 10 2009, 10:05 AM)

Hello
I'll try to solve this problem soon.

PS. But I'm not sure that this menu may be skinned automatically.
You can try to add this line into VTHeaderPopupMenu1Popup event :

CODE

(sSkinManager1.SkinableMenus.HookPopupMenu(VTHeaderPopupMenu1, sSkinManager1.Active);

it works, thank you for the rapid reply.
Don't mind about fix it, I will forget to delete the event handler in a day <img src="style_emoticons//wink.gif” style=”vertical-align:middle” emoid=”;)” border=”0″ alt=”wink.gif” />

[Author]

Posts