Einzelnen Beitrag anzeigen

Benutzerbild von geskill
geskill

Registriert seit: 17. Feb 2007
Ort: NRW
420 Beiträge
 
Delphi 2010 Professional
 
#5

Re: FastScript - dem Script ein Interface hinzufügen

  Alt 30. Dez 2009, 00:24
Dieses Objekt von dem du sprichst verwende ich im ganzen Programm nicht. (Hoffe ich weiß was du meinst)

Ums ein bisschen zu verdeutlichen:
Also die Instanz von TApplicationImpl merke ich mir nur als Inteface.
Delphi-Quellcode:
var
  IProgrammVariable: IApplication;

procedure Erstellen;
begin
  IProgrammVariable := TApplicationImpl.Create();

  IProgrammVariable.xy;
end;
Später will ich das dann dem Script hinzufügen:
Delphi-Quellcode:
procedure Hinzufügen;
begin
  with FfsScript do
  begin
    with AddClass(TApplicationImpl, 'TApplicationImpl') do
    begin
      AddMethod('procedure xy', CallMethod);
    end;
    AddObject('ScriptVariable', IProgrammVariable);
  end;
end;
Sebastian
  Mit Zitat antworten Zitat