CallFunctionPersist()
CallFunctionPersist() – Funktion in einem CodeBlock-Programm persistent aufrufen
Die Funktion entspricht einem Aufruf von CallPersist() mit dem Unterschied, dass zusätzlich noch die angegebene Funktion innerhalb des CodeBlock-Programms aufgerufen wird.
| Parameter | Beschreibung |
|---|---|
aProg:C | Name des Programmes. Der Programmname muss den kompletten Pfad enthalten. |
aFunctionName:C | Name der Funktion |
aFunctionParams:A | An die Funktion zu übergebende Parameter (default = keine) |
| aProgParams:A | An das Programm zu übergebende Parameter (default = keine). Entspricht den Parametern von Call() |
Rückgabewert
Undefined - Rückgabewert der Funktion aus dem aufgerufenen Programm
Beispiel
CODE
// Programm: CallTest
function DoDestroy()
meld('Formular zerstört'),
end,
function CreateDocking(cName)
Result := CreateObject('TFormEx', cName, , , true),
AssignEvent(Result, 'OnDestroy', 'DoDestroy'),
end,
function FreeDocking(oForm)
DestroyObject(oForm),
end,
CODE
| oForm |
oForm := CallFunctionPersist('CallTest', 'CreateDocking', {'MeinForm'}),
ShowModal(oForm),
CallFunction('CallTest', 'FreeDocking', {oForm}),
// Ausgabe: Meldung dass das Formular zerstört wurde