[*]Profan

Español

Default-Position des Hauptfensters zentriert

Wenn uno nun Ventana con sólo 2 Parametern aufruft möchte uno al liebsten hiermit una neue Größe para el zentrierte Ventana festlegen - qué el Ganze abrunden sería.
Kompilieren Marca Separación

windowtitle meinProgramm
windowstyle 1 | 2 | 4 | 8 | 16 | 512
window 320,200 breite Einstellen für das zu zentrierende Fensterre>

Yo glaube con z.B. window 320,200 möchte al tatsächlich 320x200 Pixel Innenfläche para Dibujar disponible son.

Noch una kleiner Referencia: Am besten a Ermittlung el Mitte con el Workarea rechnen como específicamente bajo Vista gerne Toolbars y Co. a el Seitenrändern kleben:
Kompilieren Marca Separación

Source wurde am 22.07.2007 in die Babyklappe auf XProfan.Com abgelegt:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
FA: Fenster immer mit Maximalgrösse öffen und
dabei alle möglichen Taskbar-Breiten und -
Positionen beachten
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
DEF SPI(4) ! user32,SystemParametersInfoA
Declare Rect#,x&,y&,b&,h&
Dim Rect#,16
SPI(48,0,Rect#,0)  SPI_GETWORKAREA,,0,Rect,0
x&=Long(rect#,0)
y&=Long(rect#,4)
b&=Long(rect#,8)
h&=Long(rect#,12)
Windowstyle 512+31
Window x&,y&-b&,h&
Dispose Rect#
waitinput
end

22.11.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Jac
de
Lad

Ist el ahora una Wunsch oder neu en S6?

Yo find beide Ideen klasse, el con el Workarea sería se sí para Ejemplo encima una neuen Stil declarieren dejar: z.B. 1024 = Angabe es Workarea...

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

22.11.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Default-Position des Hauptfensters zentriert

Es una Fakt seit X11Beta6! Roland zentriert also la ventana principal, z.B. beim ersten Imprimir oder Cls.

Mein 2-Parámetro-Ventana war sólo una Concepto a Sache abzurunden!

1024 es ya como Ventana de Estilo belegt con ToolWindow! 2048 wäre como wohl frei aber imho no nötig si uno Ventana con 2 Parametern aufrufen podría.

22.11.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Jac
de
Lad

Aso.

Naja, pero si al Ventana principal zentrieren voluntad y no el Clientarea meint, wärs Mist, also debería el una Windowstyle bekommen.

Nett wärs auch, si el Zentrieren con Crear(Ventana y Crear(Diálogo trabajo sería.

Jac

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

22.11.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

@Jac

Yo mach el siempre así:
Kompilieren Marca Separación

Declare _dlg&,breite%,hoehe%
breite%=900:hoehe%=400 sind auch nur zwei Eingaben ;)
_dlg&=CREATE(DIALOG,%HWND,,(%MaxX/2-(breite%/2)),(%MaxY/2-(hoehe%/2)),breite%,hoehe%)re>

22.11.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Jac
de
Lad

@Horst: Yo auch. Aber el me está siempre a umständlich. Bin como algo bequem. Yo podría me auch una propio SubProc escribir: Crear(CenterDialog y Crear(CenterWindow...aber uno kanns en efecto veces hier anbringen.

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

22.11.2007 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

@Jac
Bist Usted de Beruf Müde ?
Einfacher es doch no - siehe el kleine PROC
Kompilieren Marca Separación

PROC DIALOG_CENTER

    Declare _dlg&
    PARAMETERS _Dstil%,_Dmodus$,_Dbreite%,_Dhoehe%,_Dtitel$
    WindowStyle _Dstil% wenn _Dmodus$ = Dialog:dann als Parameter 0 eingeben
    _dlg&=CREATE(_Dmodus$,%HWND,_Dtitel$,(%MaxX/2-(_Dbreite%/2)),(%MaxY/2-(_Dhoehe%/2)),_Dbreite%,_Dhoehe%)

ENDPROC

declare txt%
dialog_center 48,WINDOW,500,300,Zentriertes Fenster
waitinput