Frame aus eigener Prozedur aufrufen

[Sir Rufo]

Man sollte es sich so vorstellen

Delphi-Quellcode:

TGermanSpeaking = class
  procedure Say( AText: string );
end;

procedure TalkWith( AGermanSpeaking: TGermanSpeaking );
begin
  AGermanSpeaking.Say( 'Hallo' );
end;

var
  Peter, Klaus: TGermanSpeaking;

TalkWith( Peter );
TalkWith( Klaus );