Was ist ein Objekt ?

[littleDave]

Soweit ich mich an Objects erinnern kann, musst du die nicht extra erstellen.

Delphi-Quellcode:

type
  TBlubObject = object 
    Blub: String[50]; 
    procedure Initiate;
    procedure ShowBlub; 
  end;

procedure TForm1.ButtonClick(Sender: TObject)
var Blub: TBlubObject;
begin
  Blub.ShowBlub;  // Leerstring ausgeben
  Blub.Initiate;  // "Blub.Blub := 'irgendwas'
  Blub.ShowBlub;  // 'irgendwas' ausgeben
end;

procedure TBlubObject.Initiate;
begin
  Blub := 'irgendwas';
end;

procedure TBlubObject.ShowBlub;
begin
  ShowMessage(Blub);
end;

Alle Angaben ohne Gewähr, da Delphi nicht offen