OBS/Makros und Scripting/Allgemeines/Übersicht Prozeduren: Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
Nimz (Diskussion | Beiträge) |
Nimz (Diskussion | Beiträge) |
||
Zeile 31: | Zeile 31: | ||
Meldung('Hallo Welt!'); | Meldung('Hallo Welt!'); | ||
Meldung('Hallo Welt!','Grüße'); | Meldung('Hallo Welt!','Grüße'); | ||
Meldung(' | Meldung('Ups, da ist etwas falsch gelaufen.','Fehler',True,True); | ||
end; | end; | ||
</syntaxhighlight> | </syntaxhighlight> |
Version vom 12. April 2019, 09:26 Uhr
Hier finden Sie nützliche Prozeduren, die Sie in den Makros verwenden können, um das gewünschte Ergebnis zu erzielen.
Liste der Prozeduren
MyFreeAndNil
Definition:
procedure MyFreeAndNil(var Obj);
Erklärung:
Schließt die Instanz eines Objektes und gibt den reservierten Arbeitsspeicher wieder frei. Die Objekt-Variable wird dabei auf nil (Nullwert in Delphi/Pascal) gesetzt.
Beispiel:
oBeispiel := TObject.Create();
MyFreeAndNil(oBeispiel);
//oBeispiel ist jetzt nil
Meldung
Definition:
procedure Meldung(const cMessage: String; cTitle: String = ''; lShowIcon: Boolean = True; lErrorIcon: Boolean = False);
Erklärung:
Zeigt eine Meldung auf dem Bildschirm an. Dies kann z. B. als Rückmeldung am Ende eines Makros eingebaut werden, um dem Benutzer mitzuteilen, dass das Ende erreicht ist.
HINWEIS: Der Parameter lShowIcon hate hier keine weitere Verwendung und wird intern immer als "True" behandelt.
Beispiel:
function StartProc():Boolean;
begin
Meldung('Hallo Welt!');
Meldung('Hallo Welt!','Grüße');
Meldung('Ups, da ist etwas falsch gelaufen.','Fehler',True,True);
end;
Zeigt nacheinander folgende Meldungen:
Datei:ProcMeldung Bsp1.jpg
Datei:ProcMeldung Bsp2.jpg