Jump to content

Alessandro

uniGUI Subscriber
 View Profile  See their activity

  • Posts

    104

  • Joined

  • Last visited

  • Days Won

    2

 Content Type 

Posts posted by Alessandro

    Transparent uniPanel

    in General

    Posted

    9 hours ago, Hayri ASLAN said:

    Hi,

    Add this onCreate of Form or Frame 

    

   with UniPanel1, JSInterface do
   begin
     JSAddListener('afterrender', JSFunction('sender',
            ' sender.setBodyStyle("background","transparent"); '+
            ' sender.setBodyStyle("frame",false); '+
            ' sender.setBodyStyle("border","none");')
      );
   end;

     

    Thanks! :D

    [SOLVED] Command substitute for CurrentRowSelected

    in General

    Posted

    Hello...
    I have a uniDBGrid with some selected items.
    I want to do a routine to execute only the items marked on the Grid.
    In normal Delphi it has the command:
     
    For I to DBGrid1.SelectedRows.Count - 1 then
        if DBGrid1.SelectedRows.CurrentRowSelected = True then
           showmessage('ok');
     
    But I did not find similar in uniGui.
    how do I do? Can anyone help?
    Thank you
     
     
    Solved...
     
    procedure TFm_Form.btSaveClick(Sender: TObject);
    var
      I: Integer;
      B : TBookmark;
      varAtualiza : boolean;
    begin
       varAtualiza := False;
       if Gr_Grade.SelectedRows.Count > 0 then begin
          DataSet.DisableControls;
          B := DataSet.GetBookmark;
          for I := 0 to Gr_Grade.SelectedRows.Count - 1 do begin
               (works)
                varAtualiza := True;
          end;
       end;
       if varAtualiza = True then begin
          uniMainModule.SQLTempo.Close;
          uniMainModule.SQLTempo.CommandText := 'update pokayoke a set a.situation = 0 where a.id=:id';
          uniMainModule.SQLTempo.params[0].AsInteger := 1;
          uniMainModule.SQLTempo.ExecSQL;
       end;
       DataSet.EnableControls;
       close;
    end;
     

     

    How to handle an exception

    in General

    Posted

    Good Morning!

     

    I do not know why, when and where this error occurs:

     

    Exception: TUniCustomDBGrid.MoveToRow (): Unexpected Row number: 1, 4: Addr: $ 00AAFFDD

     

    But occasionally it appears, when consulting the log generated by the system.

    I would like to know if it is possible to handle this exception and how it does.

     

    Thank you.

    Show time remaining to expire

    in General

    Posted

    Olá BUGUITO

    Eu não consegui reproduzir este exemplo.

    Você poderia me mandar um exemplo com fontes pra eu dar uma olhada?

    A mensagem de expirado é exibida ao final, porém, o label não mostra a contagem.

    Obrigado

    Opening a system via link

    in General

    Posted

     
    Hello!!
     
    Example:
    I have a "System A" that generates a report. This report is sent to the client in PDF format.
    I want to change the way the report is sent. Instead of sending the PDF, I want to send a link so that the final client can access the report at any time.
    In "System A" I generate a link (example, http://169.111.22.222:8082+codeof verification).
    I have another 'System B' that reads this link and opens the report.
    How to read this link and its parameters?
    Thank you.
     
    -------------------------------------------------------------
     
    Olá!!
     
    Exemplo:
    Eu tenho um "Sistema A" que gera um relatório. Este relatório é enviado ao cliente em formato PDF. 
    Eu quero mudar a forma de envio do relatório. Ao invés de mandar o PDF, quero mandar um link, para que o cliente final, possa acessar o relatório o qualquer momento.
    No "Sistema A" eu gero um link (exemplo, http://169.111.22.222:8082+codigode verificacao). 
    Tenho outro 'Sistema B" que faz a leitura deste link e abre o relatório.
    Como ler este link e seus parâmetros?
    Obrigado.

     

    UniScreenMask change message at run time

    in General

    Posted

    Good Morning!

     

    I would like to know if it is possible to change the UniScreenMask DisplayMessage at run time. From the tests I did here, I could not do that.

     

    Does anyone know how to do it?

     

    Ex.:

     

    Case Teste of

        0: UniScreenMask.displayMessage: = 'ok';

        1: UniScreenMask.displayMessage: = 'Not ok';

    end;

     

    Thanks

    Transform uniDBEdit to upperCase

    in General

    Posted

    Hello,

    Throughout my project, Edits and DBEdits have the property CHARCASE as ecNORMAL.

    It has some form, command or script to activate at once, throughout the project, so that the Edits are UpperCase, LowerCase or Normal (at runtime).

     

    Thank you

    [SOLVED] How to enabled false uniDBRadioGroup item

    in General

    Posted

    Hello,

     

    Can you try this approach for now ?!:

     

    For example for the second item -> getAt(1):

     

    Disable:

    UniDBRadioGroup1.JSInterface.JSAssign('radioGroup.items.getAt(1).disabled', [True]);

    Enable:

    UniDBRadioGroup1.JSInterface.JSAssign('radioGroup.items.getAt(1).disabled', [False]);

    Best regards,

     

     

    Thank you!

    [SOLVED] Format Date TUniDateTimePicker mm/dd/yyyy -> dd/mm/yyyy

    in General

    Posted

    For example for ExtLocale -> [pt_BR]

    UniDateTimePicker1 -> ClientEvents -> UniEvents -> beforeInit fn:

    function beforeInit(sender, config)
    {
    config.altFormats="dmY|m/d/Y|n/j/Y|n/j/y|m/j/y|n/d/y|m/j/Y|n/d/Y|m-d-y|m-d-Y|m/d|m-d|md|mdy|mdY|d|Y-m-d|n-j|n/j";
    }

     

    FOR TIME:

    UniDateTimePicker1 -> ClientEvents -> UniEvents -> beforeInit fn:

    function beforeInit(sender, config)
    {
    config.altFormats="g:ia|g:iA|g:i a|g:i A|h:i|g:i|H:i|ga|ha|gA|h a|g a|g A|gi|hi|gia|hia|g|H|gi a|hi a|giA|hiA|gi A|hi A";
    }

     

    Hello!
    I have another question about the same problem. Now it is with the TIME field.
    When I type 1200, the script changes the text to 12:00 (okay!)!
    But, when I type 2000, the script does not change to 20:00. I noticed that the field gives a "2000 is not a valid value" error message. And the maximum the script manages to convert is up to 1259 which transforms to 12:59.
     
    I await. Thank you.

    Acces to properties & routines of uniFrame

    in General

    Posted

    Hi,

     

    First of all, it is a general Delphi question. If you can do it in Delphi VCL then you can also do it in uniGUI.

     

    However, even if it was possible, this would be absolutely the wrong way to design your application. 

     

    A frame is a child component with no global reference to it. You can't access it unless you keep a global reference to it somewhere and manage it yourself. Frames are just like any other components. Consider it as a Panel inside a form.

     

    You can access it only if it is already inserted in a parent. Like : UniForm1.UniFrame1

     

    Hi.
    I could not make the procedure work.
    Can you give me a practical example of how it works?
    Thank you
    • Upvote 1
×
×
  • Create New...