From Clomosy Docs

No edit summary
No edit summary
Line 7: Line 7:
'''Example:'''<br>
'''Example:'''<br>
:'''Base Syntax'''
:'''Base Syntax'''
var
  MyForm:TCLForm;
  askAndCallBtn:TCLButton;
   procedure ProcYes;
   procedure ProcYes;
   begin
   begin
Line 18: Line 15:
     ShowMessage('No Clicked');
     ShowMessage('No Clicked');
   end;
   end;
procedure askAndCallBtnOnClick;
 
   begin
   begin
     Clomosy.AskAndCall('Do you like Clomosy?','ProcYes','ProcNo');
     Clomosy.AskAndCall('Do you like Clomosy?','ProcYes','ProcNo');
   end;
   end;
begin
  MyForm := TCLForm.Create(Self);
  askAndCallBtn:= MyForm.AddNewButton(MyForm,'askAndCallBtn','AskAndCall Function');
  askAndCallBtn.Align:=alTop;
  askAndCallBtn.Margins.Top:=20;
  askAndCallBtn.Margins.Right:=20;
  askAndCallBtn.Margins.Left:=20;
  askAndCallBtn.Margins.Bottom:=20;
  MyForm.AddNewEvent(askAndCallBtn,tbeOnClick,'askAndCallBtnOnClick');
  MyForm.Run;
end;


:'''TRObject Syntax'''
:'''TRObject Syntax'''
  var
    MyForm:TCLForm;
    askAndCallBtn:TCLButton;
   void ProcYes;
   void ProcYes;
   {
   {
Line 49: Line 30:
     ShowMessage('No Clicked');
     ShowMessage('No Clicked');
   }
   }
   void askAndCallBtnOnClick;
    
   {
   {
     Clomosy.AskAndCall('Do you like Clomosy?','ProcYes','ProcNo');
     Clomosy.AskAndCall('Do you like Clomosy?','ProcYes','ProcNo');
  }
 
  {
    MyForm = TCLForm.Create(Self);
   
    askAndCallBtn= MyForm.AddNewButton(MyForm,'askAndCallBtn','AskAndCall Function');
    askAndCallBtn.Align=alTop;
    askAndCallBtn.Margins.Top=20;
    askAndCallBtn.Margins.Right=20;
    askAndCallBtn.Margins.Left=20;
    askAndCallBtn.Margins.Bottom=20;
    MyForm.AddNewEvent(askAndCallBtn,tbeOnClick,'askAndCallBtnOnClick');
   
    MyForm.Run;
   }
   }

Revision as of 06:22, 4 March 2024

The "AskAndCall" function is commonly used in Clomosy programming to display a dialog box where you can request user confirmation. It has a structure similar to the "Ask" function. You can use this function to ask a question or present options to the user.

Clomosy.AskAndCall('Do you like Clomosy?','ProcYesOnClick','ProcNoOnClick');

The "AskAndCall" function takes three parameters. The first parameter represents the question or prompt displayed in the dialog box. The second parameter specifies the action to be taken if the confirmation button is clicked. If the rejection button is clicked, the function will proceed to the action specified in the third parameter.

Example:

Base Syntax
 procedure ProcYes;
 begin
   ShowMessage('Yes Clicked');
 end;
 procedure ProcNo;
 begin
   ShowMessage('No Clicked');
 end;
 
 begin
   Clomosy.AskAndCall('Do you like Clomosy?','ProcYes','ProcNo');
 end;
TRObject Syntax
 void ProcYes;
 {
   ShowMessage('Yes Clicked');
 }
 void ProcNo;
 {
   ShowMessage('No Clicked');
 }
 
 {
   Clomosy.AskAndCall('Do you like Clomosy?','ProcYes','ProcNo');
 }