Form <> Bildschirmauflösung

[Vader]

hallo kiar

hab deinen code getestet

Code:

const 
   screenwidthdev : = 1250; 
   screenheigthdev: =  960; 
var 
   x,y:integer; 
begin 
scaled := true; 
   x:= Screen.width; 
   y:= Screen.Height; 
   if(y <> ScreenHeightDev) or (x <> ScreenwidthDev) then 
     begin 
        frmMain.Height := (frmMain.ClientHeight* y div ScreenHeightDev) + 
                                frmMain.Height- frmMain.ClientHeight; 
        frmMain.Width  := (frmMain.ClientWidth * x div ScreenWidthDev)  + 
                                frmMain.Height - frmMain.ClientHeight; 
        scaleBy(x,Screenwidthdev); 
     end;

aber es kommt eine fehlermeldung bei der const deklaration

[Fehler] Summe_Ueberstunden.pas(267): Typ erwartet, aber '=' gefunden
[Fehler] Summe_Ueberstunden.pas(1052): Undefinierter Bezeichner: 'ScreenHeightDev'


mfg vader