03.02.2010 7:23, JoshyFun wrote:
I had a little extend feature for EditBox but it needs a message in
Windows (only to get a bit better look) and in other platforms it
could be solved using plain LCL. So the question is how to integrate
that message for Win32/64 without the usual #ifdef. Should a new
function be added to intfbasewinapi ? or is there a better way to do
it ? The message is an EM_ message for TextBox.
You can add TWSCustomEdit.SetSomething() and override it on win32
widgetset only:
class procedure TWin32WSCustomEdit.SetSomething(Edit: TCustomEdit;
State: Boolean);
begin
// this protects from ocasional call of SetSomething while handle is
not yet allocated
if not CheckWSHandleAllocated(...) then
Exit;
// this performs your call
SendMessage(TWin32WSCustomEdit.Handle, EM_..., WParam, LParam);
end;
In the LCL code you write where you need this:
TWSCustomEditClass(WidgetSetClass).SetSomething(Self, ...);
Best regards,
Paul Ishenin.
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
