| |
|
|
KHR | Hallo Miteinander
möchte in einem Programm während des Laufs die Fenstergröße verändern.
Das sollte mit SetWindowPos() klappen
Für das Fenster gehts, mit dem Verschieben der Buttons klappst nicht.
Was mach ich falsch? KompilierenMarkierenSeparierendeclare BT_GrafikZeigen&, BT_Abbruch&
declare BT_GrafikFertig&, BT_GrafikDrucken&
window 10,10 - (%MaxX-20),480
BT_GrafikZeigen& = Create(Button,%hwnd,Graphik zeigen, 10,(@Height(%HWND)-35),160,25)
BT_Abbruch& = Create(Button,%hwnd,Auswertung beenden, 180,(@Height(%HWND)-35),180,25)
BT_GrafikFertig& = Create(Button,%hwnd,Ende, 370,(@Height(%HWND)-35),180,25)
BT_GrafikDrucken& = Create(Button,%hwnd,Drucken, 560,(@Height(%HWND)-35),180,25)
waitkey
SetWindowPos %hwnd = 10,10 - (%MaxX-20),(%MaxY-80)
@SetFocus(%hwnd)
cls
SetWindowPos BT_GrafikZeigen& = 10,(@Height(%HWND))
SetWindowPos BT_Abbruch& = 180,(@Height(%HWND))
SetWindowPos BT_GrafikFertig& = 370,(@Height(%HWND))
SetWindowPos BT_GrafikDrucken& = 560,(@Height(%HWND))
@SetFocus(BT_GrafikZeigen& )
@SetFocus(BT_Abbruch&)
@SetFocus(BT_GrafikFertig&)
@SetFocus(BT_GrafikDrucken&)
@SetFocus(%hwnd)
waitkey
end
|
|
|
| Gruß Karl-Heinz WIN XP home/Pro / XPROFAN 11 / P2CPP ATMEL + BASCOM Fan | 02.02.2009 ▲ |
|
|
|
|
| Und wenn Du die normale 6 Parameter SetWindowPos-Variante nutzt ala setWindowPos meinButton=10,10 - 200,300;0 ? |
|
|
| |
|
|
|
KHR | Hallo David,
Du meinst so: KompilierenMarkierenSeparierendeclare BT_GrafikZeigen&, BT_Abbruch&
declare BT_GrafikFertig&, BT_GrafikDrucken&
window 10,10 - (%MaxX-20),480
BT_GrafikZeigen& = Create(Button,%hwnd,Graphik zeigen, 10,(@Height(%HWND)-35),160,25)
BT_Abbruch& = Create(Button,%hwnd,Auswertung beenden, 180,(@Height(%HWND)-35),180,25)
BT_GrafikFertig& = Create(Button,%hwnd,Ende, 370,(@Height(%HWND)-35),180,25)
BT_GrafikDrucken& = Create(Button,%hwnd,Drucken, 560,(@Height(%HWND)-35),180,25)
waitkey
SetWindowPos %hwnd = 10,10 - (%MaxX-20),(%MaxY-80)
SetWindowPos BT_GrafikZeigen& = 10,(@Height(%HWND)),160,25;0
SetWindowPos BT_Abbruch& = 180,(@Height(%HWND)),180,25;0
SetWindowPos BT_GrafikFertig& = 370,(@Height(%HWND)),180,25;0
SetWindowPos BT_GrafikDrucken& = 560,(@Height(%HWND)),180,25;0
Gruß Karl-Heinz WIN XP home/Pro / XPROFAN 11 / P2CPP ATMEL + BASCOM Fan | 02.02.2009 ▲ | |
|
|
|
|
| Das dritte Parametertrennzeichen ist aber ein Minus, kein Komma. |
|
|
| |
|
|
|
KHR | Hallo David,
ääääH - Mist !!
beim rückwärts gehen gestolpert.
Aber auch mit Minus statt Komma wirds nicht besser. |
|
|
| Gruß Karl-Heinz WIN XP home/Pro / XPROFAN 11 / P2CPP ATMEL + BASCOM Fan | 02.02.2009 ▲ |
|
|
|
|
Jörg Sellmeyer | Einfach nur Height(%hwnd) geht naturalmente auch nicht. Bischen Platz sollte man den Buttons schon gönnen: KompilierenMarkierenSeparierendeclare BT_GrafikZeigen&, BT_Abbruch&
declare BT_GrafikFertig&, BT_GrafikDrucken&
window 10,10 - (%MaxX-20),480
BT_GrafikZeigen& = Create(Button,%hwnd,Graphik zeigen, 10,(@Height(%HWND)-35),160,25)
BT_Abbruch& = Create(Button,%hwnd,Auswertung beenden, 180,(@Height(%HWND)-35),180,25)
BT_GrafikFertig& = Create(Button,%hwnd,Ende, 370,(@Height(%HWND)-35),180,25)
BT_GrafikDrucken& = Create(Button,%hwnd,Drucken, 560,(@Height(%HWND)-35),180,25)
waitkey
SetWindowPos %hwnd = 10,10 - (%MaxX-20),(%MaxY-80)
@SetFocus(%hwnd)
cls
SetWindowPos BT_GrafikZeigen& = 10,(@Height(%HWND)-30)
SetWindowPos BT_Abbruch& = 180,(@Height(%HWND)-30)
SetWindowPos BT_GrafikFertig& = 370,(@Height(%HWND)-30)
SetWindowPos BT_GrafikDrucken& = 560,(@Height(%HWND)-30)
@SetFocus(BT_GrafikZeigen& )
@SetFocus(BT_Abbruch&)
@SetFocus(BT_GrafikFertig&)
@SetFocus(BT_GrafikDrucken&)
@SetFocus(%hwnd)
waitkey
end
|
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 02.02.2009 ▲ |
|
|
|
|
KHR | Danke Jörg,
habs nun mittlerweile auch selbst rausgefunden. Irgendwie hatte ich das -35 von @Height(%HWND)-35 bei meinen Versuchen rausgewurschtelt.
Manchmal steh ich halt auf der Leitung. |
|
|
| Gruß Karl-Heinz WIN XP home/Pro / XPROFAN 11 / P2CPP ATMEL + BASCOM Fan | 02.02.2009 ▲ |
|
|
|