AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Problem beim Schließen von Form2

Ein Thema von Tobias · begonnen am 26. Okt 2004 · letzter Beitrag vom 27. Okt 2004
Antwort Antwort
Benutzerbild von Dani
Dani

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

Re: Problem beim Schließen von Form2

  Alt 26. Okt 2004, 21: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
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:19 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz