TBeCbImageListEditor
TBeCbImageListEditor
Die Klasse TBeCbImageListEditor stellt das Formular zur Anzeige und Bearbeitung der be-Image-Listen dar.
Eigenschaften:
Eigenschaften | Beschreibung |
|---|---|
CbImageIndex:N | Image-Index der ausgewählt wurde bzw. markiert wird |
CbListIndex:N | Index der Image-Liste |
CbImageLists:O | (nur lesend) Lister der Image-Listen (Collection) |
CbChanged:L | (nur lesend) Wurde die Individual-Images vom User verändert |
Beispiel
CODE
//******************************************************************************
//******************************************************************************
// Diese Funktion ist auch als globale Funktion über "Global\GUIUtils" verfügbar
//
// Zeigt den Standard-Image-List Editor an
// @Result: Array {Status des Dialogs (mrOK, mrCancel, mrAbort),
// Index Image-Liste,
// Image-Index,
// Indi Image-Liste wurde verändert}
//******************************************************************************
//******************************************************************************
function ShowBeImageListEditor(nListIndex, nImageIndex)
| oImgListEditor, nDlgResult |
Result := {},
oImgListEditor := CreateObject('TBeCbImageListEditor', 'CbImgEditor'),
startseq
// ggf. Liste und Image-Index vorbelegen
oImgListEditor.CbListIndex := nListIndex,
oImgListEditor.CbImageIndex := nImageIndex,
nDlgResult := ShowModal(oImgListEditor),
Result := {nDlgResult,
oImgListEditor.CbListIndex,
oImgListEditor.CbImageIndex,
oImgListEditor.CbChanged}
always
DestroyObject(oImgListEditor)
stopseq,
end,
writeln(ShowBeImageListEditor(0,123))