Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Self welche Unit ?

    Delphi
    by Christian Seehase, 11. Nov 2003
  Moin Homer,
  
  ich hab' mal Deine Doppelposts gelöscht ;-)
  
  Wenn Du mal die Prozedur Procedure ProgressBar_GU so einbauen würdest
  
  type
  TForm1 = class(TForm) // Ich weiss nicht, wie Dein Hauptformular heisst
  Procedure ProgressBar_GU(....);
  //...
• Forum: Sonstige Fragen zu Delphi

  Re: Self welche Unit ?

    Delphi
    by Christian Seehase, 11. Nov 2003
  Moin Homer,
  
  doch Show.
  Das ist ja gerade der Witz an der Sache, dass sich das erste Formular verhält, als würde aus diesen heraus das zweite per ShowModal geöffnet, ohne dass dieses der Fall ist.
  Wenn er self nicht kennt, hast Du es nicht innerhalb einer Methode verwendet. Nur dort gibt es self.
  
  Lies Dir diesen Thread mal in Ruhe durch. Vielleicht wird es dann klarer:
  
  prozedur aufruf...
• Forum: Sonstige Fragen zu Delphi

  Re: Self welche Unit ?

    Delphi
    by Christian Seehase, 11. Nov 2003
  Moin Homer,
  
  dazu könntest Du ein ShowModal faken.
  
  uses unit2;
  
  {$R *.DFM}
  
  procedure TForm1.Button1Click(Sender: TObject);
• Forum: Sonstige Fragen zu Delphi

  Re: Self welche Unit ?

    Delphi
    by Christian Seehase, 10. Nov 2003
  Moin Homer,
  
  warum nicht so?
  
  if ProgressBar_Form = nil then begin
  // Wird gleich wieder freigegeben, dann kann der Owner nil sein.
  ProgressBar_Form := TProgressBar_Form.Create(nil);
  try
  ProgressBar_Form.ShowModal;
  finally
• Forum: Sonstige Fragen zu Delphi

  Re: Self welche Unit ?

    Delphi
    by Christian Seehase, 10. Nov 2003
  Moin Homer,
  
  das Freigeben hast Du nicht vergessen.
  Du hast ja
  
  ProgressBar_Form.Free
  
  geschrieben.
  Das Showing muss schiefgehen, weil das Objekt zu dem Zeitpunkt noch gar nicht existiert.
  Und da Du das sichergestellt hast, mit dem try/finally Block, brauchst Du das auch nicht abzufragen.
• Forum: Sonstige Fragen zu Delphi

  Re: Self welche Unit ?

    Delphi
    by Christian Seehase, 10. Nov 2003
  Moin Homer,
  
  ein Objekt kann nicht sein eigener Owner sein.
  Das geht so also nicht.
  Wie gesagt, wenn Du sicherstellst, dass das Fenster wieder freigegeben wird, trag einfach nil ein.
  Den Owner brauchst Du nur, wenn Du Delphi dazu veranlassen willst ein Objekt automatisch zerstören zu lassen, wenn dessen Owner zerstört wird.
• Forum: Sonstige Fragen zu Delphi

  Re: Self welche Unit ?

    Delphi
    by Christian Seehase, 10. Nov 2003
  Moin Homer,
  
  TForm wäre der Klassenname.
  Du bräuchtest aber ein Objekt.
• Forum: Sonstige Fragen zu Delphi

  Re: Self welche Unit ?

    Delphi
    by Christian Seehase, 10. Nov 2003
  Moin Homer,
  
  ich wollte Dir nur mal ein anderes Beispiel dafür zeigen, wo es self gibt.
  
  Self gibt es ausschliesslich innerhalb einer Methode, also der Prozedur oder Funktion einer Klasse.
  Ansonsten musst Du ersatzweise den Namen der Variablen angeben, die das gewünschte Objekt enthält.
  
  
  Ausserdem:
  Wenn Du das Formular anschliessend gleich wieder freigibst, brauchst Du auch keinen Owner...
• Forum: Sonstige Fragen zu Delphi

  Re: Self welche Unit ?

    Delphi
    by Christian Seehase, 9. Nov 2003
  Moin Homer,
  
  Das Formular war nur ein Beispiel.
  
  Anderes Beispiel:
  
  type
  TMyClass = class(TObject)
  private
  FList : TStringList;
• Forum: Sonstige Fragen zu Delphi

  Re: Self welche Unit ?

    Delphi
    by Christian Seehase, 9. Nov 2003
  Moin Homer,
  
  self beschreibt immer das Objekt in dessen Methode Du Dich gerade befindest.
  Ausserhalb einer Methode gibt es das nicht.
  
  procedure TForm1.FormCreate(Sender: TObject);
  begin
  self.Caption := 'Hallo'; // Self ist hier gleich dem Inhalt von Form1
  end;