MessageDLG selbst gebaut

Jakane · Beiträge: 257

WasWeißDennIch hat folgendes geschrieben :

Wo wird denn JFenster erzeugt?

Wenn ich das so mache, bekomme ich den Fehler trotzdem

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

procedure TJFenster.JHinweis(Caption, Nachricht : String; Weite : Integer = 200; Hoehe : Integer = 70);
var
  cMemo : TMemo;
begin
  // Varriable initialisieren
  JFenster := TJFenster.Create;
  FFenster:= TForm.Create(Application);

Oder was meinst du?

WasWeißDennIch · Beiträge: 653 Erhaltene Danke: 160

Du hast eine globale Variable JFenster, auf die Du zugreifst. Bevor Du eine Methode davon aufrufen kannst, muss es ja erst einmal eine Instanz davon geben, daher bringt es nix, diese innerhalb der Methode anlegen zu wollen.

[edit] Schreib doch mal testhalber vor das letzte "end"

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

initialization
  JFenster := TJFenster.Create;

finalization
  JFenster.Free;

[/edit]

Jakane · Beiträge: 257

Es funktioniert und ich habe es verstanden

danke

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme