XProfan

Declare St1_Btn&[10]
WindowStyle 512+8+2
window 100,100-800,600
St1_Btn&[0] = @Control(Dialog,,$54000000,0,0,@Width(%HWnd),@Height(%HWnd),%HWnd,0,%HInstance)
St1_Btn&[1] = @control(Button,KAMERADEN
DATEN ,$50012200+$2000000,20,30,120,40,St1_Btn&[0],1,%Hinstance)
St1_Btn&[2] = @control(Button,FAHRZEUGE
GERÄTE ,$50012200+$2000000,20,80,120,40,St1_Btn&[0],2,%Hinstance)
St1_Btn&[3] = @control(Button,EINSÄTZE ,$50012200+$2000000,20,130,120,40,St1_Btn&[0],3,%Hinstance)
St1_Btn&[4] = @control(Button,PLÄNE ,$50010200+$2000000,20,180,120,40,St1_Btn&[0],4,%Hinstance)
St1_Btn&[5] = @control(Button,DRUCKEN ,$50010200+$2000000,20,230,120,40,St1_Btn&[0],5,%Hinstance)
St1_Btn&[6] = @control(Button,SUCHEN ,$50010200+$2000000,20,280,120,40,St1_Btn&[0],6,%Hinstance)

While %Key <> 2

    waitinput

EndWhile

end