Hallo!
Delphi-Quellcode:
type
TApp = class(TInterfacedObject, IApp)
private
FEditor: IEditor; //Ein Interface
constructor TApp.Create;
begin
inherited Create;
FEditor := TEditorAdapter.Create(Form1.SynEdit);
//Interface := Klasse;
if FEditor is SynEdit then ShowMessage('Editor wurde zugewiesen');
//gibt Compilerfehler : '.' erwartet aber THEN gefunden. Wie frage ich ab, ob Zuweisung
//korrekt
end;
Bin grad dabei, das Beispiel zu studieren. Meine Frage. Wie kann ich prüfen, ob das Objekt korrekt an das Interface zugewiesen wurde. Das Beispiel ist aus einem Thread mit dem Titel:
"
Dll wird nicht geladen...". Ich beschäftige mich grad mit Intefaces, weil ich das für mein nächste Projekt in der Firma benötige. Da kommt dieses Beispiel grad recht.
Danke im Voraus für Eure Hilfe
profmaster