Hallo Leute
Vielen vielen Dank für die Antworten und Aufklärungen.
Danke Jürgen für das Beispiel mit dem Include, ich hatte es schon vorher mal mit include versucht, aber erhilt ständig eine Fehlermeldung. Dann habe ich durch dein Beispiel mir mal das Include näher angesehen und habe es dann so zum laufen bekommen.
Delphi-Quellcode:
unit Setup;
interface
uses
SysUtils, Classes,
System.Reflection,
System.Runtime.InteropServices,
centrafuse.Plugins,
System.Xml,
System.Drawing,
system.Web;
type
TSetup =
class(CFSetup)
configxml : XmlDocument;
languagexml: XmlDocument;
procedure loadSetupPage;
procedure readConfig;
procedure buildControls;
// *** Sektion der Buttons Anfang ***
procedure section1_CFSetup_ok(sender: System.
Object; e: System.EventArgs);
// Diese procedure habe ich noch so deglarieren
// müssen
...
...
...
procedure TSetup.section1_CFSetup_ok(sender: System.
Object; e: System.EventArgs);
begin
// hier steht gedöhns was passieren soll
end;
procedure TSetup.buildControls;
begin
Include(CFSetup_ok, section1_CFSetup_ok);
end;
...
...
...
zumindest bekomme ich jetzt keine Fehlermeldungen mehr.
So nebenbei könnte mir einer sagen was für eine Bedeutung der befehl SWITCH und CATCH habe, also mit was das in Delphi zu vergleichen wäre ich glaube CATCH ist das gleich wie EXECPTION also ein TRY .. EXCEPT ..END anweissung. Sehe ich das so richtig.
Vielen Dank und grüsse
Rudolf