OBS/Makros und Scripting/Allgemeines/Übersicht Prozeduren: Unterschied zwischen den Versionen
Zur Navigation springen
Zur Suche springen
Nimz (Diskussion | Beiträge) Keine Bearbeitungszusammenfassung |
Nimz (Diskussion | Beiträge) |
||
Zeile 16: | Zeile 16: | ||
//oBeispiel ist jetzt nil | //oBeispiel ist jetzt nil | ||
</syntaxhighlight> | </syntaxhighlight> | ||
==Meldung== | |||
Definition: | |||
<syntaxhighlight lang="Delphi"> | |||
procedure Meldung(const cMessage: String; cTitle: String = ''; lShowIcon: Boolean = True; lErrorIcon: Boolean = False); | |||
</syntaxhighlight> | |||
Erklärung:<br /> | |||
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.<br /> | |||
<br /> | |||
Beispiel: | |||
<syntaxhighlight lang="Delphi"> | |||
oBeispiel := TObject.Create(); | |||
function StartProc():Boolean; | |||
begin | |||
Meldung('Hallo Welt!'); | |||
Meldung('Hallo Welt!','Grüße'); | |||
Meldung('Das ist was blödes passiert','Fehler',True,True); | |||
end; | |||
</syntaxhighlight> | |||
Zeigt nacheinander folgende Meldungen: | |||
[[Image:ProcMeldung_Bsp1.jpg]] | |||
[[Image:ProcMeldung_Bsp2.jpg]] | |||
[[Image:ProcMeldung_Bsp3.jpg]] |
Version vom 12. April 2019, 09:23 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.
Beispiel:
oBeispiel := TObject.Create();
function StartProc():Boolean;
begin
Meldung('Hallo Welt!');
Meldung('Hallo Welt!','Grüße');
Meldung('Das ist was blödes passiert','Fehler',True,True);
end;
Zeigt nacheinander folgende Meldungen: Datei:ProcMeldung Bsp1.jpg Datei:ProcMeldung Bsp2.jpg