29.11.2012 Aufrufe

combit List & Label - Programmierer-Referenz - combit GmbH

combit List & Label - Programmierer-Referenz - combit GmbH

combit List & Label - Programmierer-Referenz - combit GmbH

MEHR ANZEIGEN
WENIGER ANZEIGEN

Erfolgreiche ePaper selbst erstellen

Machen Sie aus Ihren PDF Publikationen ein blätterbares Flipbook mit unserer einzigartigen Google optimierten e-Paper Software.

Arbeiten mit der VCL Komponente<br />

GroupName Die Gruppe in der die Funktion im Formelassistenten angezeigt<br />

wird<br />

Visible Gibt an, ob die Funktion im Assistenten angezeigt wird oder<br />

nicht<br />

MinimumParameters Die minimale Anzahl von Parametern. Gültig sind Werte zwischen<br />

0 und 4.<br />

MaximumParameters Die maximale Anzahl von Parametern. Gültig sind auch hier<br />

Werte zwischen 0 und 4. Der Wert muss gleich oder größer der<br />

minimalen Anzahl sein. Eine größere Anzahl ergibt optionale<br />

Parameter.<br />

Parameter1 – 4 Jeder der bis zu vier Parameter kann individuell konfiguriert<br />

werden.<br />

Type Der Datentyp des Parameters<br />

Description Eine Beschreibung des Parameters für die Tooltip-Hilfe im Designer<br />

ResultType Der Datentyp des Rückgabewerts<br />

Mithilfe der Eigenschaften können Sie die neue Designerfunktion individuell einstellen.<br />

Um die Funktion schließlich zum Leben zu erwecken, müssen Sie das Ereignis OnEvaluateFunction<br />

behandeln. Über die Ereignisargumente erhalten Sie Zugriff auf die vom<br />

Benutzer eingegebenen Parameter. Um beispielsweise die römische Ziffer zurück zu<br />

liefern, verwenden Sie folgende Zeilen:<br />

procedure TDesExtForm.RomanNumberEvaluateFunction(Sender: TObject;<br />

var ResultType: TLl15XFunctionParameterType; var ResultValue: OleVariant;<br />

var DecimalPositions: Integer; const ParameterCount: Integer;<br />

const Parameter1, Parameter2, Parameter3, Parameter4: OleVariant);<br />

begin<br />

ResultValue:=ToRoman(Parameter1);<br />

end;<br />

Die Abbildung zeigt die Verwendung einer individuellen Funktion RomanNumber im<br />

Formelassistenten des Designers.<br />

107

Hurra! Ihre Datei wurde hochgeladen und ist bereit für die Veröffentlichung.

Erfolgreich gespeichert!

Leider ist etwas schief gelaufen!