On 02/16/2014 05:07 PM, FreeMan wrote:
Hello, I'm trying port components from delphi to lazarus, cross platform and QT widgetset CreateWindowEx On this winAPI I stoped and no info much for convert to widgetset. Can anyone has anyidea? What is aqual CreateWindowEx, DestroyWindow in linux QT widgetset? My system is Kubuntu x64 and last svn fpc & lazarus Thank youprocedure CreateToolTip; begin fhToolTip := CreateWindowEx(0, 'Tooltips_Class32', nil, TTS_ALWAYSTIP or TTS_BALLOON or TTS_NOPREFIX, Integer(CW_USEDEFAULT), Integer(CW_USEDEFAULT),Integer(CW_USEDEFAULT), Integer(CW_USEDEFAULT), Handle, 0, hInstance, nil); if fhToolTip <> 0 then SetWindowPos(fhToolTip, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE or SWP_NOACTIVATE); end; procedure DestroyToolTip; begin DestroyWindow(FHToolTip); end;
You cannot use that with cross apps, it's windows specific .. https://qt-project.org/doc/qt-4.8/qtooltip.html or THintWindow in lazarus.
MyHint := THintWindow.Create() ...etc. zeljko -- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
