Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: OOP mit Delphi!

    Delphi
    by aogwaba, 7. Sep 2003
  da wo du die globale Variable 'GBruch' deklariert hast, in der Form-Unit. zb. in die ButtonClick-Routine:
  
  
  GBruch := TGBruch.Create(StrtoInt(Edit1.Text),StrtoInt(Edit2.Text));
  Panel1.Caption := IntToStr(GBruch.Zaehler_gekuerzt);
  Panel2.Caption := IntToStr(GBruch.Nenner_gekuerzt);
  Panel3.caption := IntToStr(GBruch.Z_ges);
  gbruch.free;
• Forum: Object-Pascal / Delphi-Language

  Re: OOP mit Delphi!

    Delphi
    by aogwaba, 7. Sep 2003
  na genauso:
  
  var myGBruch:TGBruch;
  mybruch:TBruch;
  begin
  myGBruch:=TGBruch.create(1,1);// erzeugt instanz von TGBruch
  myBruch:=TBruch.create(1,1);//erzeugt Instanz von TBruch
  
  myBruch.free;
  myGBruch.free;
• Forum: Object-Pascal / Delphi-Language

  Re: OOP mit Delphi!

    Delphi
    by aogwaba, 7. Sep 2003
  Hi,
  
  Nein brauchst du nicht, private, public, protected und published sind Zugriffsbeschränkungen nach aussen.
  Was klappt den nicht bei den Klassen?
  Die Syntax scheint OK!
  Hier:
  
  procedure TForm1.Button1Click(Sender: TObject);
  begin
  Bruch := TBruch.Create(StrtoInt(Edit1.Text),StrtoInt(Edit2.Text));