Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Beim Destroy eines Objektes etw. in der Hauptunit ausführen (https://www.delphipraxis.net/42153-beim-destroy-eines-objektes-etw-der-hauptunit-ausfuehren.html)

gordon freeman 14. Mär 2005 19:07


Beim Destroy eines Objektes etw. in der Hauptunit ausführen
 
Hi Leute,

Ich erstelle in meiner Haupt-Unit ein Objekt und blende Das Form der Haupt-Unit aus, da das Objekt 'ne eigene Form hat.

Delphi-Quellcode:
SB := SpieleBearbeitung.Create;
MainForm.visible := false;
Soweit, so gut. Jetzt sollte, sobald das Objekt inklusive Form verschwunden ist von der MainUnit aus ein neues Objekt erstellt werden. Ich dachte, ich könnte aus dem Destroy des Objektes heraus eventuell die Procedur in der Hauptunit auslösen, die das nächste Objekt erstellt, dann Bekomme ich jedoch folgenden Fehler:

Zitat:

Zitat von Delphi schreibt
Überkreuzender Bezug zweiernits auf 'USpieleBearbeitung'

Wie kann ich also, sobald die Form des Objektes SB zerstört wurde von der MainUnit aus ein neues Objekt erzeugen?

tia, read you, gordon

Binärbaum 14. Mär 2005 20:02

Re: Beim Destroy eines Objektes etw. in der Hauptunit ausfüh
 
Den "überkreuzenden Bezug zweier Units" kannst du verhindern, indem du die Unit im unses im implementation-Abschnitt einbindest. Also etwa so:
Delphi-Quellcode:
unit Unit1;

interface

uses
  SysUtils, Types, Classes, Variants, QTypes, QGraphics, QControls, QForms,
  QDialogs, QStdCtrls;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

uses DieBetreffendeUnit;//hier sollte das hin
...
MfG
Binärbaum

gordon freeman 14. Mär 2005 20:17

Re: Beim Destroy eines Objektes etw. in der Hauptunit ausfüh
 
funzt perfekt :thumb: , Danke

:dp:


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:55 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 by Thomas Breitkreuz