[#1]
Centrowanie otwartego okna na ekranie ?
Sprawa niby banalna a jednak?
Chcemy otwarte okno ustawić centralnie na jego ekranie Screen
1).Otwieramy okno za pomocą funkcji "OpenWindow" z "intuition.library" ma rozmiary 320x200 i pozycję wyświrtlania 0,0 po otwarciu dostajemy wskaźnik do struktury "window" tego okna.
2).Okno posiada przycisk pod którym podpinamy taką oto procedurę:
;--------------------------------------------------------------
;Procedura ustawia otwarte już okno centralnie na jego ekranie Screen.
;Wymaga otwartej biblioteki 'intuition.library'.
;WEJSCIE: rej. A0 = uchwyt do otwartego juz okna czyli (WindowBase)
Center_Window: clr.l d0
clr.l d1
move.l 46(a0),a1 ;Pobieramy adres Screen
move.w 12(a1),d0 ;D0=Szerokosc Screen'u
move.w 14(a1),d1 ;D1=WysokoscScreen'u
sub.w 8(a0),d0 ;odejmujemy rozmiary okna
sub.w 10(a0),d1 ;pobrane z NewWindow
divu #2,d0 ;Tu ustalamy pozycje na
divu #2,d1 ;ekranie screen
sub.w 4(a0),d0
sub.w 6(a0),d1
move.l IntBase,a1
jsr MoveWindow(a1)
rts
;--------------------------------------------------------------
Wciskamy przycisk i zawieszona Copper'lista wyświetla na ekranie
efekt przepięknej zorzy polarnej ale nie o to chodziło.......
Opisuje bo problemu dalej nie rozwiązałem?