delphi-xe5

问题 How to get screenshot of browser in DCEF3? I create browser like this without VCL. The TakePicture method will only work if No debugger is used If ShowWindow is used var info: TCefWindowInfo; Settings: TCefBrowserSettings; begin FillChar(info, SizeOf(info), 0); info.width := width; info.height := height; FillChar(Settings, SizeOf(TCefBrowserSettings), 0); Settings.Size := SizeOf(TCefBrowserSettings); GetSettings(Settings); CefBrowserHostCreateBrowser(@info, FHandler, FDefaultUrl, @settings,

来源： https://stackoverflow.com/questions/62969608/debugging-a-package-during-component-installation

问题 We have a large application that works fine in Delphi 2006. We've moved it to XE5 and are experiencing frequent sporadic Access Violations. We're using VCL forms and a number of DevExpress and other third party components. We're working in Windows 7 Professional with Delphi XE Enterprise, Version 19.0.14356.6604. We've looked on line, here and elsewhere, for postings about A/Vs after porting to XE5 but haven't found anything that seems relevant to our problem. Here's what we know about the A

问题 I am trying to make a countdown timer, the idea is to set the time in text edit property and after i click set timer(button), that time to be sent to Label, which will then start the countdown to 0. I have gotten to this part, but i cant figure out a way to make seconds countdown, If any of you guys can help I would appreciate it. I tried this from an example I found online but it didnt work because this is Firemonkey application. dec(TotalTime); {decrement the total time counter} // Timer

问题 How i can destroy form, I want: creatr Form1(start application), create Form 2, destroy Form1, working with form2, then create form 3, destroy form2. but I not know how to destroy form. If i call: procedure TFPressStartScreen.btn1Click(Sender: TObject); begin MainScreen.FMainScreen := MainScreen.TFMainScreen.Create(Application); MainScreen.FMainScreen.Show; DisposeOf; end; FPressStartScreen - 1 form, FMainScreen - 2 form, i create 2 form and need destroy 1. but i get access violation. 来源：

问题 I have a REST Server with an Android Client , both on Deplhi Xe5 The android client succesfully connects with the Rest server. In my server I have a TDSHttpWebDispatcher with SessionTimeout =1200000 (20 min) So when the user in android doesn't use the app for more than 20 min, gets the "Session has expired" error when do a request to the REST server. I already set the PresserveSessionId=False in the DSRestConnection in the Client app, so there is no sessiontimeout error, but it makes the app

问题 i tried to covert the wifimanager and wifiinfo (android) and i don't understand why i had segmentation fault, i saw that wifimanager worked well, but when i try to call some methods of wifiinfo i get "segmentation fault". my code: http://developer.android.com/reference/android/net/wifi/WifiInfo.html http://developer.android.com/reference/android/net/wifi/WifiManager.html unit wifi1; interface uses System.SysUtils, Androidapi.JNIBridge, Androidapi.JNI.GraphicsContentViewText, Androidapi.JNI

问题 i tried to covert the wifimanager and wifiinfo (android) and i don't understand why i had segmentation fault, i saw that wifimanager worked well, but when i try to call some methods of wifiinfo i get "segmentation fault". my code: http://developer.android.com/reference/android/net/wifi/WifiInfo.html http://developer.android.com/reference/android/net/wifi/WifiManager.html unit wifi1; interface uses System.SysUtils, Androidapi.JNIBridge, Androidapi.JNI.GraphicsContentViewText, Androidapi.JNI

问题 I am trying to save unicode string. There is what I have: Uses IniFiles; const SZ_APP_NAME; Procedure TForm1.SaveSettings; var _MemIniU: TMemIniFile; SettingsPath: string; begin SettingsPath := GetHomePath + PathDelim + SZ_APP_NAME + PathDelim; _MemIniU := TMemIniFile.Create(ChangeFileExt(SettingsPath, 'Settings.ini'), TEncoding.UTF8); try if Form1.WindowState <> TWindowState.wsMaximized then begin _MemIniU.WriteInteger(SZ_APP_NAME, 'WindowLeft', Form1.Left); _MemIniU.WriteInteger(SZ_APP_NAME

问题 I am trying to save unicode string. There is what I have: Uses IniFiles; const SZ_APP_NAME; Procedure TForm1.SaveSettings; var _MemIniU: TMemIniFile; SettingsPath: string; begin SettingsPath := GetHomePath + PathDelim + SZ_APP_NAME + PathDelim; _MemIniU := TMemIniFile.Create(ChangeFileExt(SettingsPath, 'Settings.ini'), TEncoding.UTF8); try if Form1.WindowState <> TWindowState.wsMaximized then begin _MemIniU.WriteInteger(SZ_APP_NAME, 'WindowLeft', Form1.Left); _MemIniU.WriteInteger(SZ_APP_NAME