-
Posts
867 -
Joined
-
Last visited
-
Days Won
28
Content Type
Profiles
Forums
Events
Everything posted by erich.wanker
-
i use this WorkAround: Please set a uniImage in the background of your frame (without Picture - just the uniImage) set all Anchors .. and test following code: procedure TyourFrameName.UniImage1Resize(Sender: TUniControl; OldWidth, OldHeight: Integer); begin a_test_uniLabel.Caption:=inttostr(UniImage1.Width) +' - '+ inttostr(UniImage1.Height) end; if you resize your frame OR the Webbrowser - you will get the event ... and if your image is Aligne: alClient - you will get the Width and Height of your frame Hope this helps :-) Erich
-
Hi has someone following setup running? A 64Bit Server Operating System 64 bit APACHE Webserver 64 Bit Mysql 64 Bit PHP 64 Bit Hyperserver ... and Hyperserver starts and manage 32 bit UniGui.dll ??? <- THAT´S the important POINT Does something run? .. and stable..? If this run - can i use the 32bit DLL for delphi to connect to mysql (libmysql.dll) - and use the 32bit OpenSSL-DLL´s in my 32bit UniGui.DLL ? (libeay32.dll & ssleay32.dll) ThanX for infos Erich
-
Performance problem with DBGrid - Paged=true
erich.wanker replied to erich.wanker's topic in General
hi wilton_rad i thought, a paged uniDBGrid with PageSize 50 will make the same as "Skip" or "LIMIT" ? .. OffTopic: i now made my own "Paged" with 3 Icons .. first, prior, next - no "last" because i dont want to read the recordcount of ALL effected records (needs time - what i want to reduce) Nice greetings Erich -
Hello. How can i use the "WebOptions / Paged" without loosing performance ? Very Fast: uniDbGrid1.Paged = false; ZQuery.Sql.append('SELECT * FROM table ORDER BY field LIMIT 50 OFFSET 1' ); Very Slow: uniDbGrid1.Paged = true uniDbGrid1.PageSize = 50 uniDbGrid1.FetchAll = False uniDbGrid1.Buffered= False ZQuery.Sql.append('SELECT * FROM table ORDER BY field' ); UniGui: 1.90.0.1523 MySQL Tabel with 100.000 Records Connection via ZeosLib 7.7-Components Apache 2.4 ThanX for help Erich Stay save - stay at home - Stay healthy !!!
-
Get the result of a Javascript (gps position)
erich.wanker replied to erich.wanker's topic in General
Hy Hayri, (my PWA on android does not ask for permission) can it be - that the possition function works just with https ??? - actualy i use NO https -
HyperServer: actual 119 bak files in server-root-folder
erich.wanker replied to erich.wanker's topic in General
push :-) additional information: every of the hundereds of files in my htdoc-root folder is also in a folder as example c:\myServer\htdocs\200312.bak\unigui.exe.200312-112356.bak.846 c:\myServer\htdocs\unigui.exe.200312-112356.bak.846 -
Get the result of a Javascript (gps position)
erich.wanker replied to erich.wanker's topic in General
Hi .. the function (i actual make a desktop AND mobile version with the Desktop-Components) is not working on a android ... so i thought - i try to use javascript .. -
i forgot how to get results from a javascript.. ;-) Actually - i need latitude and longitude as Double-Delphi-variables if i click on a button (on desktop and Mobile).. the html example : - https://www.w3schools.com/html/tryit.asp?filename=tryhtml5_geolocation <!DOCTYPE html> <html> <body> <p>Click the button to get your coordinates.</p> <button onclick="getLocation()">Try It</button> <p id="demo"></p> <script> var x = document.getElementById("demo"); function getLocation() { if (navigator.geolocation) { navigator.geolocation.getCurrentPosition(showPosition); } else { x.innerHTML = "Geolocation is not supported by this browser."; } } function showPosition(position) { x.innerHTML = "Latitude: " + position.coords.latitude + "<br>Longitude: " + position.coords.longitude; } </script> </body> </html>
-
Hi Aslan... :-) The mainPage is: https://www.tirol.gv.at/statistik-budget/tiris/ a demo map can be seen : https://maps.tirol.gv.at/login_pvp.jsp?user=guest&project=tmap_master Manual are here - BUT JUST IN GERMAN ( i hope you can translate it with a tool) https://www.tirol.gv.at/fileadmin/themen/landesentwicklung/raumordnung/bilder/tiris/tirisMaps30_Bedienungsanleitung.pdf The best translation Tool ever: https://www.deepl.com/en/translator i hope this informations are helpfull .. if you need better or deeper informations - i can connect to the tyrolin goverment and can organize ANY Information you neeed . ThanX for your engagement Nice greetings Erich
-
in one of your uniForms (or Uniframes) create a function: in uses add IdHTTP in private add function talkwithphp(url_to_php:string):string; function TUniform.talkwithphp(url_to_php:string):string; const cUSER_AGENT = 'Mozilla/4.0 (MSIE 6.0; Windows NT 5.1)'; var httpResponse: string; Stream: TStringStream; URL, telParams:string; HTTP:TidHTTP; begin URL:=url_to_php; Stream := TStringStream.Create; HTTP:=TIdHTTP.Create(nil); HTTP.ReadTimeout := 10000;{ IdTimeoutInfinite; } HTTP.ConnectTimeout := 10000; try HTTP.Request.UserAgent := cUSER_AGENT; try HTTP.Get(URL, Stream); result:= Stream.DataString; except result:= 'Communication Error!'; end; finally Stream.Free; HTTP.Free; end; end; when make a onButtonClick or something .. procedure TUniform.UniButton20Click(Sender: TObject); begin showmessage(talkwithphp('http://yourdomain.com/phps/myphp.php?value=123')); end;
-
HyperServer: actual 119 bak files in server-root-folder
erich.wanker replied to erich.wanker's topic in General
[transport] pool_size=0 command_timeout=20000 request_timeout=300000 connect_timeout=20000 [http_transport] start_port=16384 [hyper_server] binary_name=xxx.exe initial_nodes=2 max_nodes=8 max_sessions=0 sessions_per_nodes=0 prompt_login=1 persistent_node_zero=0 port=17082 url_path= url_referer= ext_root=[ext]\ uni_mobile_root=[unim]\ uni_root=[uni]\ uni_packages_root=[unipack]\ max_requests=500 detailed_log=0 antiflood_per_ip=0 server_root= server_title= [node_recycling] enabled=1 recycle_after_secs=3600 recycle_after_sessions=0 recycle_after_idle_secs=300 recycle_when_empty=1 [login-0] user_name=Administrator password=xxx admin=1 [login-1] user_name= password= admin=0 [login-2] user_name= password= admin=0 [login-3] user_name= password= admin=0 [login-4] user_name= password= admin=0 [login-5] user_name= password= admin=0 [login-6] user_name= password= admin=0 [login-7] user_name= password= admin=0 [login-8] user_name= password= admin=0 [login-9] user_name= password= admin=0 [custom_mimes] mime_0_ext= mime_0_type= mime_1_ext= mime_1_type= mime_2_ext= mime_2_type= mime_3_ext= mime_3_type= mime_4_ext= mime_4_type= -
wow .. that would be VERY HELPFULL !!! :_)
-
ThanX for the perfect information :-) i just found the Google elevation dataset api thing and try to play with the google JSON - if i send Longitude and Latitude https://developers.google.com/maps/documentation/elevation/intro function Tf_show_myMap.SendAnfrage(linkadresse:string):string; const cUSER_AGENT = 'Mozilla/4.0 (MSIE 6.0; Windows NT 5.1)'; var httpResponse: string; Stream: TStringStream; URL, telParams:string; HTTP:TidHTTP; begin URL:=linkadresse; Stream := TStringStream.Create; HTTP:=TIdHTTP.Create(nil); HTTP.ReadTimeout := 10000;{ IdTimeoutInfinite; } HTTP.ConnectTimeout := 10000; try HTTP.Request.UserAgent := cUSER_AGENT; try HTTP.Get(URL, Stream); result:= Stream.DataString; except result:= 'Communication Error!'; end; finally Stream.Free; HTTP.Free; end; end; procedure Tf_show_myMap.UniButton20Click(Sender: TObject); begin showmessage(SendAnfrage('http://maps.googleapis.com/maps/api/elevation/json?locations=39.7391536,-104.9847034 [and your API key] ')); end;
-
yes - but :-) in html- sourcecode of the unigui page - there is the line : <script src="https://api-maps.yandex.ru/2.1/?apikey=asd&lang=en_US"></script> and this is breaking my neck ;-) (it does not matter if the JS is used or not ) In the europien union - there is the GDPR .. https://en.wikipedia.org/wiki/General_Data_Protection_Regulation and since now ALL used Librarys in unigui HTML HEADER are local or gdpr comform .. (if local - when i have to check the functions and have to validate if everything is correct) Extjs is allso GDPR comform: see https://www.sencha.com/legal/gdpr/ Now - i have a russian JS source ( what has no gdpr rule) in the header - and that is not allowed.. The biggest problem is: my software IS A GDPR Tool :-)
-
HyperServer: actual 119 bak files in server-root-folder
erich.wanker replied to erich.wanker's topic in General
push :-) -
Hi, can i unclude a cutom map in uniMap what uses WMS? The owner of the map has following informations online for his map including: a) WMS: https://gis.tirol.gv.at/arcgis/services/Service_Public/orthofoto/MapServer/WMSServer? or https://gis.tirol.gv.at/arcgis/services/Service_Public/terrain/MapServer/WMSServer? b) WCS: https://gis.tirol.gv.at/arcgis/services/Service_Public/terrain/MapServer/WCSServer? c) WFS: https://gis.tirol.gv.at/arcgis/services/Service_Public/OGD/MapServer/WFSServer? d) WMTS: http://wmts.kartetirol.at/wmts ThanX for Infos :-)
-
hi .. to calculate the lenght of a line - i should calculate allso with the altitude .. see as example: https://www.mapcoordinates.net/en is the altitude-value in future possible? At this time i become Lat and Lng Values procedure UniMap1MapClick(Sender: TObject; const Lat, Lng: Double; const Zoom, X, Y, Id: Integer); ThanX Erich
-
converting the file at uploading would speed up the later viewing - and the server cpu is not used so hard if users are looking at files ;-) ..and it could work allso with emails :-) https://github.com/nickrussler/eml-to-pdf-converter
-
Hi .. i found powerShell-Scrips to convert doc, docx, xls, xlsx, ppt, pptx into PDF-Files https://support.coolorange.com/support/solutions/articles/22000225569-how-to-convert-office-documents-to-pdf-with-powershell What do you think is the best way (on which event ..) to do a converting? ThanX for suggestions Erich
-
Hy.. have i made a wrong config? i have a lot (119) of "unigui_name.exe.200227-162156.bak.674" files in my root folder / a lot of folders like "200302.bak"
-
Hi, the YadexAPIKey was allways emty. The only solution for me was (see postings above) to deaktivate in unit "uniMap.pas" the class procedure TUniMap.AddYandexJSLibrary(const ApiKey: String); .. where is the line "if apiKey = empty then use apikey=asd&lang=en_US" and: UniAddJSLibrary('unimap/Yandex.js', False, [upoPlatformBoth, upoFolderUni]); FYandexLibraryInitialized := True;
-
Yes .. but if i have just mlOSM and mlGoogle - i have in sourceCode of html Page: <script src="https://api-maps.yandex.ru/2.1/?apikey=asd&lang=en_US"></script> ... so i have a problem with my customers and with autority and the "General Data Protection Regulation (GDPR) " of the EU https://en.wikipedia.org/wiki/General_Data_Protection_Regulation PS: Google, Microsoft, Dropbox and the other big cloud providers are apparently GDPR compliant, since they can still offer their services in the EU after the GDPR.
-
And a other problem the uniApp with uniMap comunicate with russia ( yandex.ru) ?? thats a no-go here ! I comment out in uniMAP.pas: class procedure TUniMap.AddYandexJSLibrary(const ApiKey: String); begin // Yandex Map { if Trim(ApiKey)<>'' then UniAddJSLibrary('https://api-maps.yandex.ru/2.1/?lang=en_US&apikey='+ApiKey, True, [upoPlatformBoth]) else UniAddJSLibrary('https://api-maps.yandex.ru/2.1/?apikey=asd&lang=en_US', True, [upoPlatformBoth]); UniAddJSLibrary('unimap/Yandex.js', False, [upoPlatformBoth, upoFolderUni]); FYandexLibraryInitialized := True; } end; but thats not a future-save solution ;-)
-
perfect :-) LAST QUESTION ;-) How can i switch between UniMap-Layers with own buttons? thanX Erich
-
Hi Sherzod, i use 1.90.0.1523 - found the Component - but not the demo? But the demo i found in -> C:\Program Files\FMSoft\Framework\uniGUI\Demos\Desktop\GoogleMaps uses a UniHTMLFrame1 for Google Maps? what make i wrong ;-) nice greetings Erich