OBS/Makros und Scripting/Allgemeines/Übersicht Prozeduren: Unterschied zwischen den Versionen

Aus OBS Wiki
Zur Navigation springen Zur Suche springen
Keine Bearbeitungszusammenfassung
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 ProcMeldung Bsp3.jpg