<div dir="ltr"><div>It looks like the code tries to create a tooltip window. I think Lazarus provides this functionality by itself in a cross-platform way, so you may want to look up that and replace the functionality there. An alternative would be to create the tooltip window yourself.<br>
<br></div>The code you show isn't just creating any window, but it creates a window of the class "Tooltips_Class32" specifically which AFAIK provides the tooltip functionality. So what you need to replace isn't the CreateWindow part (that would be easy), but the tooltip functionality part.<br>
<br></div><div class="gmail_extra"><br><br><div class="gmail_quote">On Sun, Feb 16, 2014 at 5:07 PM, FreeMan <span dir="ltr"><<a href="mailto:freeman35@delphiturkiye.com" target="_blank">freeman35@delphiturkiye.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Hello,<br>
I'm trying port components from delphi to lazarus, cross platform and QT widgetset<br>
CreateWindowEx On this winAPI I stoped and no info much for convert to widgetset. Can anyone has anyidea?<br>
What is aqual CreateWindowEx, DestroyWindow in linux QT widgetset?<br>
My system is Kubuntu x64 and last svn fpc & lazarus<br>
Thank you<br>
<br>
procedure CreateToolTip;<br>
begin<br>
fhToolTip := CreateWindowEx(0, 'Tooltips_Class32', nil, TTS_ALWAYSTIP or TTS_BALLOON or TTS_NOPREFIX,<br>
Integer(CW_USEDEFAULT), Integer(CW_USEDEFAULT),<u></u>Integer(CW_USEDEFAULT),<br>
Integer(CW_USEDEFAULT), Handle, 0, hInstance, nil);<br>
<br>
if fhToolTip <> 0 then<br>
SetWindowPos(fhToolTip, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE or SWP_NOACTIVATE);<br>
end;<br>
<br>
procedure DestroyToolTip;<br>
begin<br>
DestroyWindow(FHToolTip);<br>
end;<br>
<br>
--<br>
______________________________<u></u>_________________<br>
Lazarus mailing list<br>
<a href="mailto:Lazarus@lists.lazarus.freepascal.org" target="_blank">Lazarus@lists.lazarus.<u></u>freepascal.org</a><br>
<a href="http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus" target="_blank">http://lists.lazarus.<u></u>freepascal.org/mailman/<u></u>listinfo/lazarus</a><br>
</blockquote></div><br></div>