From Clomosy Docs

Revision as of 15:22, 24 February 2023 by ClomosyManager (talk | contribs)

Quick Look Entry Level Advanced Level


Variable Shortcuts
Caption Value
String String
Integer Integer
Float Float
Double Double
Boolean Boolean
True True
False False


Common Shortcuts
Caption Value
Clomosy Clomosy
OpenForm OpenForm
ResumeLocalEvent ResumeLocalEvent
LocalScripterLog LocalScripterLog
Extra Shortcuts
Caption Value
Clomosy.OpenForm(ft,fdt,fro,ffo) Clomosy.OpenForm()
StandartOpenForm Clomosy.OpenForm(ftItems,fdtSingle,froAddNew,ffoNoFilter);
NextOpenForm Clomosy.ResumeLocalEvent := False; Clomosy.OpenForm(ftItems,fdtSingle,froAddNew,ffoNoFilter);
AsString AsString
ShowMessage() ShowMessage('')



OpenForm Params Shortcuts
Caption Value
ftItems ftItems
ftProducts ftProducts
ftCustomers ftCustomers
ftTasks ftTasks
ftEmployees ftEmployees
ftThreads ftThreads
ftTypes ftTypes
ftMembers ftMembers
ftGroups ftGroups
ftMasters ftMasters
ftActivities ftActivities
ftThreadDetails ftThreadDetails
fdtNone fdtNone
fdtSingle fdtSingle
fdtBasket fdtBasket
fdtGuide fdtGuide
fdtBasketPopup fdtBasketPopup
fdtBasketCheckList fdtBasketCheckList
fdtBasketWithMaster fdtBasketWithMaster
froReadOnly froReadOnly
froAddNew froAddNew
froUpdate froUpdate
ffoNoFilter ffoNoFilter
ffoDoFilter ffoDoFilter
ffoDoFilterWithEmpty ffoDoFilterWithEmpty


Component Shortcuts
Caption Value
Found Found
Insert Insert
Edit Edit
Post Post
Next Next
FieldByName() FieldByName('')
EmptyDataSet EmptyDataSet
EOF EOF
ztKeylocate CloudQ.KeyLocate('Product_Code' ,LokalQ.FieldByName('Product_Code').AsString)
ztFormSearch Clomosy.DBSelectedQItemForThread.FieldByName('Activity_Code').AsString ='002'
ztPostJson Clomosy.DBCloudPostJSON(ftProducts,CloudQ.GetJSONString);
DBRemoteToCloudXCopyRecord DBRemoteToCloudXCopyRecord
DBRemoteQueryWith DBRemoteQueryWith
DBCloudQueryWith DBCloudQueryWith
DBSQLServerQueryWith DBSQLServerQueryWith
Close Close
Sql.Text Sql.Text
ExecSql ExecSql
Free Free
AppUserGUID Clomosy.AppUserGUID


Clomosy.AppUserGUID Clomosy.AppUserGUID
ztRunOpenForm Clomosy.OpenFormParams.OpenFormTemplate := ftTasks;

Clomosy.OpenFormParams.CustomBackFormGUIDFiledValue:=Clomosy.AppUserGUID; Clomosy.OpenFormParams.CustomBackFormSelectedFilter:='; Clomosy.OpenFormParams.CustomBackFormValuesOverWrite:=True; Clomosy.OpenFormParams.OpenDisplayType := fdtsingle;//ftactivities; Clomosy.OpenFormParams.RecordOption := froReadOnly;//froAddNew; Clomosy.OpenFormParams.FilterOption := ffoDoFilter;//ftactivities; Clomosy.RunOpenForm(Clomosy.OpenFormParams);

With Do With WITH {QRY} DO BEGIN END;
bfCreate MyForm := TFrmClomosyBasisForm.Create(Self); MyForm.Run;
bfPanel ztPnl:=MyForm.AddNewPanel(MyForm,'ztPanel','); MyForm.NewObject := TBasisControl(ztPnl);MyForm.NewObject.Align := alCenter;
bfEdit ztEdt:=MyForm.AddNewEdit(MyForm,'ztEdit','); MyForm.NewObject := TBasisControl(ztEdt);MyForm.NewObject.Align := alCenter;
bfLabel ztLbl:=MyForm.AddNewLabel(MyForm,'ztEdit','); MyForm.NewObject := TBasisControl(ztLbl);MyForm.NewObject.Align := alCenter;
bfButton ztBtn:=MyForm.AddNewButton(MyForm,'ztBtn','Ztac Button'); MyForm.NewObject := TBasisControl(ztBtn);MyForm.NewObject.Align := alCenter;
bfImage ztImg:=MyForm.AddNewImage(MyForm,'ztImg'); MyForm.SetImage(ztImg,'https://cdn-icons-png.flaticon.com/512/84/84555.png');