Ich wär schon froh, wenn die Codeformatierung anonyme Methoden kennen würde. Wenn man eigene Zeilenumbrüche behalten lässt, gehts einigermaßen, aber nicht schön. Ich weiß nicht, ob das schon dran war das Thema.
+1
Delphi-Quellcode:
class function TApiPlugin.CMSBelongsTo(ACMSPluginPath, AWebsiteSourceCode: string): Boolean;
var
_BelongsTo: Boolean;
_Plugin: ICMSPlugIn;
begin
_BelongsTo := False;
LoadPlugin(ACMSPluginPath,
{ } procedure(var APlugin: IPlugIn)
{ } begin
{ . } if APlugin.QueryInterface(ICMSPlugIn, _Plugin) = 0 then
{ ... } try
{ ..... } _BelongsTo := _Plugin.BelongsTo(AWebsiteSourceCode);
{ ... } finally
{ ..... } _Plugin := nil;
{ ... } end;
{ } end);
Result := _BelongsTo;
end;
Ich mach das mit den geschweiften Klammern, aber ist ein enormer Aufwand nur damit es halbwegs lesbar ist!