{"id":117,"date":"2007-05-12T14:31:56","date_gmt":"2007-05-12T12:31:56","guid":{"rendered":" http:\/\/www.nsonic.de\/blog\/2007\/05\/stayontop\/"},"modified":"2007-05-12T14:31:58","modified_gmt":"2007-05-12T12:31:58","slug":"stayontop","status":"publish","type":"post","link":"https:\/\/www.nsonic.de\/blog\/2007\/05\/stayontop\/","title":{"rendered":"StayOnTop"},"content":{"rendered":"

Liang Liem wrote in message
\nnews:
\n37660B6D.83D9E151@capelon.se… <\/p>\n

Hi,<\/p>\n

I have a delphi-application that always using one of two forms. The
\napplication needs
\nto be on top of any other application that may exist on the screen.
\nI have tried to switch the FormStyle property to FStayOnTop on the form
\nthat is currently
\nvisible (and FStayOnTop off for the hidden form). However, it does not
\nwork properly.
\nThe delphi help also recommends to not change that property
\nduring run-time.<\/p>\n

Is there any other way to make a form stay on top on the screen ?<\/p>\n

Regards
\nLiang Liem
\n<\/em><\/p>\n

Formular immer im Vordergrund anzeigen – auch nachtr\u00e4glich!
\nStay on Top <\/p>\n

[code lang=”delphi”]Try this:<\/p>\n

Function ShowFormTop(Frm:TForm):Boolean ;
\nBegin
\n Result := SetWindowPos(Frm.Handle,HWND_TOPMOST,
\n Frm.Left,Frm.Top,Frm.Width,Frm.Height,
\n SWP_SHOWWINDOW);
\n Frm.Update ;
\nEnd;
\n[\/code]
\n-Steve-<\/p>\n

[tags]Delphi, Forms[\/tags]<\/p>\n","protected":false},"excerpt":{"rendered":"

Liang Liem wrote in message news: 37660B6D.83D9E151@capelon.se… Hi, I have a delphi-application that always using one of two forms. The application needs to…<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"spay_email":""},"categories":[11],"tags":[75,100],"jetpack_featured_media_url":"","jetpack_shortlink":"https:\/\/wp.me\/p71Tml-1T","_links":{"self":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts\/117"}],"collection":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/comments?post=117"}],"version-history":[{"count":0,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/posts\/117\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/media?parent=117"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/categories?post=117"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.nsonic.de\/blog\/wp-json\/wp\/v2\/tags?post=117"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}