-
Posts
867 -
Joined
-
Last visited
-
Days Won
28
Content Type
Profiles
Forums
Events
Everything posted by erich.wanker
-
?? ... i dont understand how
-
Hello Oscar .. can´t find something about it .. https://www.google.com/search?q=Pec2Console what do you meen with "pec2console" ThanX
-
got it... UniHTMLFrame1.HTML.Append('<div class="navigationsgrundflaeche" onclick="javascript:ajaxRequest(MainForm.form,''AGENT'',[''param0=+frage.Text+''',''param1='+frage.Text+'']);"><p>' + beschriftung + '</p></div>');
-
Hello .. i want to add html to a UniHTMLFrame .. and if a user clicks on a item - i want to handle it I have in TS_AGENT = class(TUniForm) a UniHTMLFrame1: TUniHTMLFrame with: UniHTMLFrame1.HTML.Append('<div class="navigationsgrundflaeche" onclick="ajaxRequest(MainForm,"AGENT" , ["parameter="'+frage.Text+' ])"; ><p>' + beschriftung + '</p></div>'); in MainForm - i have procedure TMainForm.UniFormAjaxEvent(Sender: TComponent; EventName: string; Params: TStrings); begin if EventName='AGENT' then showmessage(Params[0]); but nothing works :-( what is the right syntax for this? ThanX for help Erich
-
How do you create Reports? FastReport or jQuery plugins?
erich.wanker replied to elGringo's topic in General
i use https://www.digital-metaphors.com/ .. i generate Reports as Word, Exel, PFD .. with it and i am very happy :-) ( threadSafe and fast ..) -
hello, i have a application (unigui with Firebird SQL Server) and the start takes 5 seconds ... the DLL has a size of 45 MB .. a screenshot of loading stepps ANY IDEAS ? ThanX
-
i create a array of tuniPanels with meine_marker[x]:=TUniPanel.Create(self); i give the unipanels different css classes with UniSession.AddJS(meine_marker[x].JSName + '.addCls(''marker_1'');'); is it possible to give the unipanel different backgrounds?? i tryed out in css-file: background-image: url(bullet.png); .. but doesnt work... is it possible with "UniSession.AddJS(meine_marker[x].JSName +"... and somting else? ThanX for help
-
What make i wrong? i want to add css-class to created UniPanel: meine_marker[x]:=TUniPanel.Create(self); meine_marker[x].ClientEvents.Enabled:=true; meine_marker[x].ClientEvents.ExtEvents.Values['beforerender']:='function(sender, eOpts){ sender.addClass("abgerundet_marker");}'; thanX for suggestions
-
if i comment out : //meine_bilder[1].Proportional:=true; //meine_bilder[1].Center:=true; then the stretch-function works ....
-
Hello, if i create a image at runtime - and load the picture = the stretch and proportional values doesnt work i Use: meine_bilder[1]:=TuniImage.Create(self); meine_bilder[1].Url:='files/navigator/skigebiet-nassfeld.jpg'; meine_bilder[1].AutoSize:=false; meine_bilder[1].top:=0; meine_bilder[1].left:=0; meine_bilder[1].Width:=100; meine_bilder[1].Height:=70; meine_bilder[1].Parent:=imagepanel; meine_bilder[1].Proportional:=true; meine_bilder[1].Center:=true; meine_bilder[1].Stretch:=true; meine_bilder[1].Repaint; meine_bilder[1].OnClick:=bild_onclick; i want create tumbnails of images dynamicaly - and a big image will show the clickted tumbnail ...
-
O.T.: @javascript-profis: Drag&Drop of unipanel...
erich.wanker replied to erich.wanker's topic in General
fuck ... GREAT !!!!!!!!!!! thanks .. thanks ... thanks ... perfect work !!!! :-) -
Hello i want to create at runtime different uniPanels... Att runtime - i add in ClientEvents / ExtEvents : function afterrender(sender, eOpts) { sender.dd = new Ext.dd.DDProxy(sender, ''); sender.dd.afterDrag = (function (){sender.doLayout()}); Ext.onReady(function () { Ext.get(sender.id).select(".x-form-field").each(function (el) {sender.dd.addInvalidHandleId(el.dom.id)}) } ); } .. so i can drag and drop the panel in a UniForm .. 1.) Now i want to save the position of the unipanels for the next time (a array of uniPanels) - but when i read the position per delphiCode - the actual position of a moved-uniPanel is not read .. (it´s clear that a javascript should update the position to a delphi-variable .. but i dont know how) 2.) how can i prevent that a unipanel moved out of the UniForm.showmodal-Window? ( if left < 0 then left:=0) ThanX for suggestions
-
Hello Farshad, no problems ... just a question .. i use only apache ... i just want to know if where are differents betweend this 2 Servers .. :-) THanX
-
Hello, are where differents between IIS and Apache - about performance of a UniGui -dll ? Thanx for information.
-
Embarcadero RAD Studio 2016 Product Approach and Roadmap
erich.wanker replied to Lena's topic in General
wow .. :-) -
Hello, i am planing to rent a dedicated Server for my uniGUI app I am developing on a 32bit machine (Win8.1 32bit) i use delphi XE4 32 bit (german edition) i want to use (??) Apache/2.4.3 (Win32) PHP/5.4.7 What is the best CPU for the UniGUI DLL ? ( single core / multi core .. where get i the best result for a 32bit DLL? ) What is the best Windows Operating System ? (only Firebird sql (super or classic server??) / Apache Server / UniGui should running on this machine) SSD as HD is no problem .. "a lot of Ram" is no problem .. ThanX for suggestion
-
Hello ... i played a little bit with "animate" and "TweenLite" ... but i am confused :-( in a delphi procedure - i want to start a animation with "UniSession.AddJS" : "a lot of stars" should be on the display ... and should fade out and scale to zero (with acceleration) on left/top corner of browser-window .. and stay on top if some UniForms are displayed .. it should visualisize that the "User-score" is increased +1 ... and it should "feel" cool ;-) what i have (my code trash below..) is not useable ANY IDEAS HOW TO DO THIS? ThanX procedure TV_STRUKTUR.UniBitBtn1Click(Sender: TObject); var x,y:String; begin x:=inttostr(mainform.Width); y:=inttostr(mainform.Height); UniSession.AddJS(stars.JSName + '.animate({ duration: 0, to: { x: 0, y: 0, width:0, height:0, opacity:0 }});'); UniSession.AddJS(stars.JSName + '.animate({ duration: 1200, to: { x: 0, y: 0, width:'+x+', height:'+y+', opacity:100 }});'); UniSession.AddJS(stars.JSName + '.animate({ duration: 1200, to: { x: 0, y: 0, width:0, height:0, opacity:0 }});'); //UniSession.AddJS(stars.JSName + '.animate({ duration: 1000, to: { x: 10, y: 10, opacity: 100}});'); //UniSession.AddJS('TweenLite.set("#"+'+stars.JSName+'.getId()+"", {scale:0.1, autoAlpha:0, x:0, y:0, z:0, delay:0.2});'); //UniSession.AddJS('TweenLite.to("#"+' +stars.JSName+'.getId()+"", 0.5, {scale:2, autoAlpha:0.5, x:50 ,y:50 ,z:50 , delay:0.5});'); //UniSession.AddJS('TweenLite.to("#"+' +stars.JSName+'.getId()+"", 0.9, {scale:1, autoAlpha:1, x:500,y:500,z:500, delay:0.5, clearProps:"transform"});');
-
short and sweet ;-) -> How can i add Icon in uniListBox? ThanX for suggestions
-
Close old Session - if the same username starts a new Session
erich.wanker replied to erich.wanker's topic in General
To User XUYB19870303 - i think "personal conversation" is not the best way to ask ;-) I made a automatic logoff for old sessions like this: i use a uniTimer ... i didn´t find a solution without timer :-( in unimainmodule: public username:String; LMessageStr:String; in main: procedure TMainForm.UniTimer2Timer(Sender: TObject); begin if UniMainModule.LMessageStr <> '' then begin ShowMessage(UniMainModule.LMessageStr); UniMainModule.LMessageStr := ''; end; in my login-form: // Andere Session finden und beenden.... uniMainModule.username:= uniedit1.text // the username ASessionList := UniServerModule.SessionManager.Sessions.SessionList; try for I := 0 to ASessionList.Count -1 do begin USession := TUniGUISession(ASessionList); M := USession.UniMainModule as TUniMainModule; if UniApplication.UniSession.SessionID <> USession.SessionId then // Do not close my OWN Session begin if M.username = uniedit1.text then begin M.LMessageStr := 'Sie haben sich an einem anderen System angemeldet..'+#13+'Sie werden automatisch in 10 Sekunden abgemeldet!'; USession.TerminateAfterSecs(10); Break; end; end; end; finally // UniServerModule.SessionManager.Sessions.SessionList.UnlockList; end; hth and nice greetings Erich -
hello ... i use http://forums.unigui.com/index.php?/topic/4263-unigui-pdf-viewer-demo/?hl=pdf .. how can i set standard-view to "page width" .. not 50% ? thanks for help erich
-
Hello i want to execute JS if "UniSession.SendFile(CacheFileName);" is sending a big PDF if i write in delphi: procedure print lPDFDevice1:= TppPDFDevice.Create(nil); CacheFileName := UniServerModule.LocalCachePath + FormatDateTime('hhmmsszzz', NOW) + 'Reporte.pdf'; lPDFDevice1.FileName := CacheFileName; lPDFDevice1.Publisher := Report1.Publisher; Report1.PrintToDevices; UniSession.SendFile(CacheFileName); --> ! unisession.AddJS('MainForm.mask.hide();'); the Mask.hide call is to early .. how can i told UniSession to run 'MainForm.mask.hide();' after sendFile is started? ThanX Erich
-
Hello i can not find a solution to loop a report-pipeline through a set of selected rows in a uniDbGrid ... .. i found no "SelectedList" or something Any ideas? ThanX Erich
-
Fast and easy way ;-) UniServermodule -> SupperessErrors -> errObjectNotFound -> Checkbox HTH Erich