Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
14. Okt 2010
Genau so. Du legst eine Variable für das Formular an, und speicherst da drin zu welchen Edit es gehört.
MfG
Fabian
Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
13. Okt 2010
Moin Sascha
Warum du die mehrmals öffnest interessiert mich hier gerade nicht ;) Aber wo du es gerade erwähnst, könntest du natürlich speichern, welches Edit "Schuld" dafür war, dass sich das Fenster öffnete.
Ereignisse sind wie normale Prozeduren, nur war ich etwas Tippfaul. Du kannst normalerweise den Inhalt immer übernehmen.
MfG
Fabian
Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
6. Okt 2010
Moin,
also das wichtige ist erst mal zu verstehen was man möchte: Du möchtest eine bestimmte Anzahl Formulare. Zum Beispiel 42 :stupid: dann musst du auch 42x ein Formular erstellen. Wie erstellt man ein Formular? Indem man TForm.Create aufruft. Oder in deinen Fall TForm5, dabei ist TForm5 quasi TForm: Nämlich kann TForm5 alles das was auch TForm kann. Also ein (leeres) Fenster anzeigen. TForm5...
Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
29. Sep 2010
Du kannst den zweiten Code aus den zweiten Beitrag nehmen (den ohne with). Da sollte sich bei jedem klick auf den Button ein neues Fenster öffnen. Und wenn du mehrere Fenster brauchst, dann kannst du das in einer Schleife ausführen. Ich wollte die nur zeigen, was man immer verhindern sollte: Die Variablen wie Form5 zu nehmen. Dadurch handelst du dir nur Fehler ein. Aktuell kann ich nicht so viel...
Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
28. Sep 2010
Naja ganz 100% muss das nicht stimmen. Und zwar dann, wenn die Klasse TForm5 ein öffentliches Attribut oder Methode hat die auch Form5 heißt. Dann weiß ich nicht, was with da bevorzugt. Ich meine es ist ja quasi x. innerhalb von with. Das ist nur nicht der Fall, wenn x. in den Moment nicht gültig wäre. Zum Beispiel:
with TButton.Create(nil) do
begin
Caption := 'Foo';
Text := 'Text';
end;...
Forum: Object-Pascal / Delphi-Language
Delphi
by xZise,
28. Sep 2010
Ach dieses With, das macht doch alles unübersichtlich. Ich übersetze mal deinen Code in "ohne-with-Code":
var
x : TForm5; // Variable von with
begin
x := TForm5.Create(Application.MainForm);
for i := 1 to 1 do
Form5.left:= Random(Screen.Width - Form5.Width);
Form5.Top:= Random(Screen.Height - Form5.Height);
Form5.caption:= Form2.Label22.caption;
Form5.Name :=...