Kategoriearchive: Allgemein

Neue Webseiten

Hallo liebe Besucher,

heute wurde der schoeffler.biz Webauftritt komplett neu gestaltet. Ich hoffe das das neue schlichte Design gut ankommt. Im Zuge der Aktualisierung sind auch einige veraltete Inhalte weggelassen wurden. Wenn jemand etwas vermissen sollte, so bitte ich um eine kuzre Nachricht.

viele Grüße
Ralf Schöffler

use the entire screen

Globall embed: Inside The Global Map

Module('User32.dll')
    SetWindowPos(LONG,LONG,SIGNED,SIGNED,SIGNED,SIGNED,LONG),BOOL,PASCAL
    GetWindowLong(LONG,SIGNED),LONG,PASCAL,NAME('GetWindowLongA')
    SetWindowLong(LONG,SIGNED,LONG),LONG,PASCAL,NAME('SetWindowLongA')
End

In INIT of the frame right after opening the window:

OrgStyle# = GetWindowLong(0{PROP:Handle},-16)
OrgStyle# = BXOR(OrgStyle#,0C00000H)
NewStyle# = SetWindowLong(0{PROP:Handle},-16,OrgStyle#)
r# = SetWindowPos(0{PROP:Handle},0,0,,,24h)

To find Max values i guess you can first do a 0{PROP:Maximized} = True and use the API GetWindowPos to read the Window size. Dont use
GetPosition(0,X,Y,W,H) because if you uses toolbars the WindowSize is redused. Using GetWindowPos will give you the correct size.


Ole-Morten Heien

——————————————————————————
Question:

> With a standard Clarion application (app frame, etc), how do I get a
> procedure to use the entire screen, not just the app window?
>
> This is for a POS application which I want to appear as a normal
> Windows application, EXCEPT when it it running as a cash register.
> The cash register procedure should use the entire screen.
>
> Can’t seem to find the right combination of settings, or whatever.