XProfan

- Seite 2 -

« Dieser Beitrag wurde als Lösung gekennzeichnet. »

- Seite 3 -

Habs eben getestet und funzt aber GetWindowRect ist halt eine API und wenn Du ohne xpse arbeitest musst Du diese halt definieren per Def oder Header-File oder ImportDLL ... oder per external aufrufen:
Kompilieren Markieren Separieren

cls
var wnd&=%hWnd
declare rect#
dim rect#,16
external("user32","GetWindowRect",wnd&,rect#)
print "x,y,xx,yy",long(rect#,0),long(rect#,4),long(rect#,8),long(rect#,12)
waitInput

- mir ist diese Aufrufform nur zu lahm oder "zu blöd" bei Funktionen die eh im System permanent bekannt sind.

Manfred
Barei

Hallo iF,

wie bekomme ich jetzt eigentlich die x und y Koordinate vom Hauptfenster, %WinLeft und %WinTop funktioniert hier nicht richtig.
Ich bekomme die Koordinaten nur einmal und dann nicht mehr

Gruß

Zu wenig Wissen ist gefärlich, zu viel auch.(XProfan X4) | Win 10 Pro 64 | Win7 Ultimate 32/64 | AMD FX-8320, 16GB, GeForce GT 630 |

Meinst Du die Verscrollung? Dann einfach: [...]

[offtopic]Signatur kann man nun wieder bearbeiten ^^ bei "gefärlich" fehlt ein H ^^[/offtopic]

Manfred
Barei

nein, ich meine die x und y Koordinaten des Programmfensters auf dem Desktop.

Zu wenig Wissen ist gefärlich, zu viel auch.(XProfan X4) | Win 10 Pro 64 | Win7 Ultimate 32/64 | AMD FX-8320, 16GB, GeForce GT 630 |

Bei welchem Code genau?

Wenn winTop etc.. scheitert dann nutzt der Code bestimmt ein eigenens Fenster - Fensterpositionen einfach per GetWindowRect [...]

.
Kompilieren Markieren Separieren

declare rect#
dim rect#,16
GetWindowRect(wnd&,rect#)
print "x,y,xx,yy",long(rect#,0),long(rect#,4),long(rect#,8),long(rect#,12)
waitInput

Ungetestet!

Genau für sowas mein Wunsch: [...]

Manfred
Barei

iF,

es bezieht sich alles auf deinen Democode mit den Scrollareas.

Zu wenig Wissen ist gefärlich, zu viel auch.(XProfan X4) | Win 10 Pro 64 | Win7 Ultimate 32/64 | AMD FX-8320, 16GB, GeForce GT 630 |

Sorry, Du meinst bestimmt den oben den ( [...]

):
Kompilieren Markieren Separieren

windowstyle 512 | 2048
cls
windowstyle 2 | 8 | 16 | 512
userMessages wm_close,wm_lButtondown,wm_rButtonDown
long 	hDlg=create("Window",0,"Neues Fenster",(%maxx/2-880/2),(%maxy/2-560/2),880,560)

Quasi unsichtbares hWnd und hDlg als anzeigendes Fenster, also GetWindowRect auf hDlg anwenden sollte klappen.

Manfred
Barei

iF, ich habe das jetzt mal mit (Width und Height mit dem opt. 2. Parameter )der 12? Version getestet, aber da bekomme ich nur die Fensterbreite und nicht wie von Dir gewwünscht die X und Y Koordinaten.

Wie soll das in Profan mit dem GetWindowRect funktionieren, ich habe im Netz nur VB, Delphi und C Code gefunden, damit kann ich aber nichts anfangen.

Zu wenig Wissen ist gefärlich, zu viel auch.(XProfan X4) | Win 10 Pro 64 | Win7 Ultimate 32/64 | AMD FX-8320, 16GB, GeForce GT 630 |

Dis habsch Dir doch hier schon vorgemacht: [...]

- auch wenn ich mir (die meiner Meinung nach "überflüssigen") Definitionen "gespart" habe weils mit xpse ja eh unnötig ist.