Jump to content

Jancarlos Martins

Members
  • Posts

    92
  • Joined

  • Last visited

  • Days Won

    7

Everything posted by Jancarlos Martins

  1. Blz Nirlan, Estou desenvolvendo um sistema de CRM, mas não coloquei em produção ainda pelo mesmo motivo.. t+
  2. Only IE, <script language="javascript"> function showMacAddress(){ var obj = new ActiveXObject("WbemScripting.SWbemLocator"); var s = obj.ConnectServer("."); var properties = s.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration"); var e = new Enumerator (properties); var output; output='<table border="0" cellPadding="5px" cellSpacing="1px" bgColor="#CCCCCC">'; output=output + '<tr bgColor="#EAEAEA"><td>Caption</td><td>MACAddress</td></tr>'; while(!e.atEnd()) { e.moveNext(); var p = e.item (); if(!p) continue; output=output + '<tr bgColor="#FFFFFF">'; output=output + '<td>' + p.Caption; + '</td>'; output=output + '<td>' + p.MACAddress + '</td>'; output=output + '</tr>'; } output=output + '</table>'; document.getElementById("box").innerHTML=output; } </script>
  3. Jancarlos, Paraná Existe um sub-forum específico para lingua Portuguesa, http://forums.unigui.com/index.php?/forum/25-portuguese/
  4. Hi mehmet pak, I got the effect to close the form 1-Create file JS example Effects.js <applicaton>\files\Effects.js Ext.define("Effects",{ singleton:true, setAnimeteTarget:function(objName,targetName) { Ext.WindowMgr.each(function(window) { var isWin=window.isXType('window'); if(isWin && window.isVisible() && objName==window.getId()) { window.animateTarget=targetName; } }); } }); 2-Declare file ServerModule.pas->CustomFiles files/Effects.js 3-Declare all the forms that you want the effect Form->ClientsEvents->ExtEvents->0-OnActivate function window.OnActivate(sender) { Effects.setAnimeteTarget(sender.getId(),<Target>.getId()); } Example <Target>= Form.button1.getId();
  5. Um exemplo simples, este código logo abaixo não funciona o programa não vai parar no showmodal, por isso usa callback dentro do form2 para forçar um retorno em alguma variavel. procedure TForm1.BuscaCliente(Sender:TObject); begin if form2.ShowModal=mrOK then codigo=form2.getCodigo; end;
  6. Da uma olhada nos demos tem exemplo de callback.
  7. Hi all, I tested your code, I only have to resolve TimePanel have to be in javascript, because they many are sending handleevents, we will improve the code. thanks
  8. I Agree 3) Standard Version (GPLv3) 4) Pro Version - level support pack
  9. Hi fikret, Alter UniServerModule->ExtJsVersion = 4.1.1a works fine
  10. Hi fikret What your version Delphi , Unigui? what error
  11. Hi, I Use Delphi XE2, Ext 4.2, Unigui Beta 0.93.0.996 Please, change ServerModule ExtJsVersion your version.
  12. I Close sample, please download source
  13. Blz Diego, Eu uso no modo standalone, funciona legal, mas você pode criar varias DLL'S e publicar no IIS. A performance depende da SQL, claro que você não vai mostrar 100.000 registros em uma grid, então muito filtro e paginação, fica legal. 2 Fontes separados, você diz DLL e um EXE, ou 2 DLL, se for isso e so publicar no seu ISS quantas DLL você quizer. A respeito da licença, tem que comprar o EXTJS. qualquer duvida estamos ai.. Att, Jancarlos P. Martins
  14. Hi, put midas.dll in the project directory
  15. Hi folks, New version 0.1 put effects, icons desktop 32x32px and transparency in forms, but still has some bugs. Next step fix the bugs, publishing sources see later
  16. I use Icons size 64x64 pixel, but could be 32x32.
  17. Please, English or Portuguese, I used the google translator but do not understand
  18. Still has some bugs, when ready I will attach source for Farshad
  19. No, i add forms in my application, but could use UniHtmlView in form default.
  20. Hi, To Minimize form procedure TUniServerModule.addMinimize(form:TUniForm); var name:string; begin if not(biMinimize in form.BorderIcons) then form.BorderIcons := form.BorderIcons + [biMinimize]; name := StringReplace(form.WebForm.ExtWindow.Id,'_id','',[rfReplaceAll] +[rfIgnoreCase]); form.Script.Add(name +'.on('+#39+'minimize'+#39+',function(w){w.toggleCollapse();w.setVisible(!w.isVisible());});'); end; OnCreate new Form add event addMinimize UniServerModule.addMinimize(self); to Maximize form.show
×
×
  • Create New...