Einzelnen Beitrag anzeigen

Benutzerbild von Dani
Dani

Registriert seit: 19. Jan 2003
732 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: Problem beim Schließen von Form2

  Alt 26. Okt 2004, 22:28
Der Text in Edit1 ist leer. Ein leerer String kann nicht in einen Integer-Wert konvertiert werden.
StrToIntDef() dagegen liefert bei einem Fehler einen Standardwert zurück.

Welchen Sinn hat es überhaupt, die Größe von Form2 zu setzen, nachdem du es geschlossen hast?


Edit: Probier mal folgendes:

Delphi-Quellcode:
implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.New1Click(Sender: TObject);
begin
 Form2.ShowModal;
end;
In Form2 die Eigenschaft "ModalResult" von Button1 auf "mrOK" setzen. OnClick kannst du dann frei lassen. Du könntest sogar folgendes machen:

Delphi-Quellcode:
implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.New1Click(Sender: TObject);
begin
 case Form2.ShowModal of
  mrOK: //User hat Button1 gedrückt;
  //usw...
 end;
end;
Um einen Wert aus Form2 an Form1 "weiterzugeben" musst du eigentlich nichts weiter machen, als Unit2 in die Uses-Liste aufzunehmen (was du ja bereits getan hast *g*). Die Werte Height und Width müssten eigentlich auch verfügbar sein, wenn das Formular versteckt ist.
Dani H.
At Least I Can Say I Tried
  Mit Zitat antworten Zitat