TMS iCL DEVELOPERS GUIDE - TMS Software

TMS SOFTWARE
TMS iCL
DEVELOPERS GUIDE
updated from iCloud.
OnDocumentsLoaded
OnDocumentsRefreshed
OnInitialized
OnDocumentDataChanged
Event called when the documents are loaded,
after calling LoadDocuments.
Event called when the documents are refreshed.
Event called when iCloud is initialized.
Event called when an iCloud document data has
changed.
Initialization
When dropping a component on the form, it will try to connect to the iCloud document storage
container specified by the ContainerIdentifier property. If you have no intention to create multiple
containers (such as the difference between a paid and a trial application), leave the
ContainerIdentifier empty, so the default container is accessed. As this process is asynchronous, an
event is triggered when the component is done initializing.
After initialization succeeds, the documents can be loaded. If the initialization fails, you can try to
reconnect by calling TMSFMXNativeiCloudDocument1.SwitchContainer;
procedure TForm1.TMSFMXNativeiCloudDocument1Initialized(Sender: TObject;
ASuccess: Boolean);
begin
if ASuccess then
TMSFMXNativeiCloudDocument1.LoadDocuments;
end;
When the documents are loaded, the OnDocumentsLoaded event is called, and the listbox can be
filled with the names of the documents.
procedure TForm1.TMSFMXNativeiCloudDocument1DocumentsLoaded(Sender:
TObject);
var
doc: TTMSFMXNativeiCloudDocumentItem;
I: Integer;
begin
ListBox1.BeginUpdate;
ListBox1.Clear;
for I := 0 to TMSFMXNativeiCloudDocument1.DocumentCount - 1 do
begin
doc := TMSFMXNativeiCloudDocument1.DocumentByIndex[I];
// ListBox1.Items.Add(doc.DisplayName);
ListBox1.Items.Add(doc.FileSystemName);
end;
150