Formulargröße beim Öffnen immer gleich

[JKHero]

Moin,

ich habe ein Problem mit meiner Formulargröße: habe ein pagecontrol auf ein formular gesetzt, sodass das formular mehrmal mit einem anderen activen tab geöffnet wird. Beim ersten öffnen wird dieses auch in normalgröße (572x870) geöffnet. nach dem öffnen kann man dieses auch maximieren.
Wenn dieses formular nun geschlossen und beim nächsten mal geöffnet wird, bleibt es maximiert. ich möchte es aber wieder in normalgröße geöffnet haben.
ich habe auch bereits ein oncreate auf das formular gesetzt. Allerdings nur mit den abmessungen, also height:=572 und Width:=870.
muss ich da noch was anderes beachten oder gibt es ne andere lösung für das problem?

[Christian Seehase]

Moin JK,

ich vermute mal, dass Du ein Unterformular meinst.
Beim Schliessen wird so ein Formular beim Close nur unsichtbar gemacht.
Die Grössenangabe im OnCreate hilft hier nicht, da dieses Ereignis in diesem Falle nicht ausgelöst wird.
Probier's mal mit dem OnShow-Event.

[JKHero]

Delphi-Quellcode:

procedure TForm1.FormShow(Sender: TObject);
begin
Form1.Height:=572;
Form1.Width:=870;
end;

hab das so versucht, bringt allerdings auch nichts.
aber du hast schon recht. es ist ein unterformular was jedesmal mit showmodal aufgerufen wird

haaaaaaalt stop! kommando zurück: klappt mit windowstate:= wsNormale ziemlich gut

aber vielleicht kannst du mir noch verraten, warum ich meine form im programmier fenster nicht mehr sehen kann. die pas datei und so kann ich alles sehen, aber das formular an sich nicht so wirklich....

[himitsu]

Oder erstell das Formular nur solange, wie es benötigt wird und gib es dann wieder frei.
Beim nächsten Mal wird es dann wieder mit den Design-Werten neu erstellt.
Und zwischendurch gammelt es auch nicht nutzlos im RAM rum.

Was heißt "nicht so wirklich" ?

[JKHero]

ich habe es so gemacht, wie ich eben schon geschrieben habe. das geht am enifachsten.

nicht so wirklich heißt in diesem fall "gar nicht"

[Christian Seehase]

Moin JK,

Zitat von JKHero:

aber vielleicht kannst du mir noch verraten, warum ich meine form im programmier fenster nicht mehr sehen kann. die pas datei und so kann ich alles sehen, aber das formular an sich nicht so wirklich....

mal angenommen ich habe Dich richtig verstanden:
Unit auswählen und F12 drücken.

[JKHero]

Das hab ich auch schon versucht. Das komische ist ja, dass ich die unit, alles zur objekthierarchie und objektsinspektor sehen kann, aber das eigentliche formular nicht.
wer weiß wie ich mein programm wieder zerschossen habe...

[Bummi]

Hast Du mal WindowState=wsNormal; versucht?

[himitsu]

Wenn in der DPR der Form-Kommentar zur Unit fehlt, dann kann die IDE oftmals das Fenster nicht zuordnen.
Manuell reparieren oder Unit aus Projekt entfernen und neun einbinden.

[JKHero]

die dpr schaut so aus. die nicht zu sehende form ist form1

Delphi-Quellcode:

program Mdiapp;

uses
  Forms,
  MAIN in '..\ECDIS Trainer Arbeitskopie\MAIN.PAS' {MainForm},
  CHILDWIN in 'CHILDWIN.PAS' {MDIChild},
  about in 'about.pas' {AboutBox},
  Unit1 in '..\Ecdis Trainer\Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2},
  Unit3 in 'Unit3.pas' {Form3},
  Unit4 in 'Unit4.pas' {Form4};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := 'ECDIS Trainer';
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TAboutBox, AboutBox);
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm4, Form4);
  Application.Run;
end.