Italia
Foro

SetWindowPos auf Controls

 

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?
KompilierenMarkierenSeparieren
declare 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 ?
 
02.02.2009  
 




KHR
Hallo David,

Du meinst so:
KompilierenMarkierenSeparieren
declare 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.
 
02.02.2009  
 




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:
KompilierenMarkierenSeparieren
declare 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  
 



Answer


Topictitle, max. 100 characters.
 

Systemprofile:

Kein Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Bitte anmelden um einen Beitrag zu verfassen.
 

Topic-Options

1.049 Views

Untitledvor 0 min.
H.Brill12.03.2023
Jörg Sellmeyer23.06.2020
RICOSCH23.11.2014
Klaus Ernst17.01.2011

Themeninformationen

Dieses Thema hat 3 subscriber:

KHR (4x)
iF (2x)
Jörg Sellmeyer (1x)


Admins  |  AGB  |  Applications  |  Autori  |  Chat  |  Informativa sulla privacy  |  Download  |  Entrance  |  Aiuto  |  Merchantportal  |  Impronta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Giochi  |  Cerca  |  Support

Ein Projekt aller XProfaner, die es gibt!


Il mio XProfan
Private Notizie
Eigenes Ablageforum
Argomenti-Merkliste
Eigene Beiträge
Eigene Argomenti
Zwischenablage
Annullare
 Deutsch English Français Español Italia
Traduzioni

Informativa sulla privacy


Wir verwenden Cookies nur als Session-Cookies wegen der technischen Notwendigkeit und bei uns gibt es keine Cookies von Drittanbietern.

Wenn du hier auf unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung von Informationen in unseren Cookies auf XProfan.Net zu.

Weitere Informationen zu unseren Cookies und dazu, wie du die Kontrolle darüber behältst, findest du in unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Ich möchte keinen Cookie