Einzelnen Beitrag anzeigen

Benutzerbild von Coffeecoder
Coffeecoder

Registriert seit: 27. Apr 2011
242 Beiträge
 
Delphi 6 Enterprise
 
#5

AW: Form wird bei onCreate nicht angezeigt

  Alt 23. Feb 2012, 13:04
Meine Form35 wird bei oncreate nicht angezeigt?


Code:
Delphi-Quellcode:
procedure TForm33.FormCreate(Sender: TObject);
const
   screenwidthdev = 1280; // Einstellungen auf dem Entwicklungsrechner
   screenheightdev = 720; // Einstellungen auf dem Entwicklungsrechner
var
   x,y:integer;
begin
   scaled := true;
   x:= Screen.width;
   y:= Screen.Height;
   if(y <> ScreenHeightDev) or (x <> ScreenwidthDev) then
     begin
        Form33.Height := (Form33.ClientHeight* y div ScreenHeightDev) +
                                Form33.Height- Form33.ClientHeight;
        Form33.Width := (Form33.ClientWidth * x div ScreenWidthDev) +
                                Form33.Height - Form33.ClientHeight;
        scaleBy(x,Screenwidthdev);
         Form35.Show;
          AdoConnection1.Connected :=true;
           AdoTable1.Active :=true;
            AdoTable2.Active :=true;

end;
end;
Hast du ein Breakpoint bei Form35.Show gesetzt und geschaut ob du dahin kommst?
Coffeecoder
  Mit Zitat antworten Zitat