Delphi | 易学教程

Indy 10 + SSL = works in Windows 7, does not work on XP

阅读更多关于 Indy 10 + SSL = works in Windows 7, does not work on XP

问题 I'm using the Indy 10 Http Client (latest SVN build) and a SSL Handler (Delphi 7) to get the content of the https://www.webtide.com/choose/jetty.jsp website. It works fine on Windows 7 x64 (tested on two systems), but on WindowsXP x86 (tested on 3 systems) the test app simply hangs on TIdHTTP.Get() without the possibility of a recovery (meaning even disconnecting in a worker-procedure/thread does not work!). The test app cannot be recovered and must be closed with the task manager. The SSL

Indy 10 + SSL = works in Windows 7, does not work on XP

阅读更多关于 Indy 10 + SSL = works in Windows 7, does not work on XP

Using ADODataset component to open an Excel Spreadsheet

阅读更多关于 Using ADODataset component to open an Excel Spreadsheet

问题 I'm using ADOdataset component to view an Excel Spreadsheet on a Delphi form. The component requires that the CommandText property be set to the name of a spreadsheet in the workbook being opened. How can I set this property to open the first spreadsheet in the workbook regardless of the name? procedure TForm1.BitBtn1Click(Sender: TObject); var XLSFile, CStr : string; begin if OpenDialog1.Execute() then begin XLSFile := OpenDialog1.FileName; CStr := 'Provider=Microsoft.Jet.OLEDB.4.0;Data

Checking whether there are <input> object attribute values in the HTML Code using Delphi

阅读更多关于 Checking whether there are object attribute values in the HTML Code using Delphi

问题 How do I check whether there are input object attribute values in HTML Code using Delphi? there isn't value attribute. <input name="input1" type="text"/> there is value attribute. <input name="input1" type="text" value=""/> I've tried the following if WebBrowser1.OleObject.Document.GetElementByID('input1').getAttribute('value')<>nil then ShowMessage('value attribute is available') else ShowMessage('value attribute isn"t available') 回答1: I thought that I'd put this up as an answer as it took

Debugging problems with ‘WITH’ statement in Delphi 2006 [duplicate]

阅读更多关于 Debugging problems with ‘WITH’ statement in Delphi 2006 [duplicate]

问题 This question already has answers here : Closed 7 years ago . Possible Duplicate: What's wrong with Delphi's “with” I am have a problem debugging code that uses a ‘WITH’ statement in BDS 2006 The debugger will not show the values of the variables with in a class or record. Am I doing something wrong or does BDS 2006 have a bug ? type TNumber = class Num: Integer; end; implementation {$R *.dfm} var MyNumber: TNumber; procedure TForm2.FormCreate(Sender: TObject); begin MyNumber := TNumber

How to get the currently active form in my application?

阅读更多关于 How to get the currently active form in my application?

问题 How to get the currently active (focused) form in my application? 回答1: You can code the following ways : var CurrentForm: TForm; // Make sure to make it a global variable procedure KeyDownEvents(var Key: Word; Shift: TShiftState); begin CurrentForm:=Screen.ActiveForm.Name; if Key = VK_F9 then CurrentForm.KeyBoard1.Show; end; This will fix the issue. Similarly you can handle the form on mouse click and other key press. Hope this helps. 回答2: Screen.ActiveForm does the trick. 来源： https:/

How do I hide a non-visual component on a form at design-time?

阅读更多关于 How do I hide a non-visual component on a form at design-time?

问题 I am working on the GUI of an older program (in Delphi). Some of the forms are small and have a number of non-visual components on them (UDP servers, UDP clients etc). I'm sure I used to be able to hide/show the non-visual components on the form with a hot-key, but I can't remember what it was. It may have been in an add-in that I have not added-in since upgrading to XE. Does anyone know where/what this might be? 回答1: This option is included inside of the Gexperts menu and is called Hide/Show

Winsoft ComPort for Android USB Serial v3.1-SEO狼术

阅读更多关于 Winsoft ComPort for Android USB Serial v3.1-SEO狼术

　　Winsoft ComPort for Android USB Serial v3.1 for Delphi & C++ Builder XE6 - 10.3 FULL SOURCE 　　适用于Android的Delphi和C ++ Builder XE6 USB USB v3.1的Winsoft ComPort-10.3完整源代码　　用于Android的USB连接设备的Delphi和C ++ Builder串行通信库。　　使用UsbSerial库　　支持CP210x，CP2130，CDC，FTDI，PL2303和CH34x设备　　无需特殊的root访问权限　　可用于Delphi / C ++ Builder XE6-10.3 　　注册版本中包含的源代码　　应用程序中的免版税分配　　Delphi and C++ Builder serial communication library for USB connected devices for Android. 　　uses UsbSerial library 　　supports CP210x, CP2130, CDC, FTDI, PL2303 and CH34x devices 　　no special root access privileges needed 　　available for Delphi

Winsoft Media Recorder for Android v1.7-SEO狼术

阅读更多关于 Winsoft Media Recorder for Android v1.7-SEO狼术

　　Winsoft Media Recorder for Android v1.7 for Delphi & C++ Builder XE5 - 10.3 FULL SOURCE 　　用于Delphi和C ++ Builder XE5的Android v1.7的Winsoft Media Recorder-10.3完整源代码　　适用于Android的Delphi和C ++ Builder媒体记录器组件。　　使用Android MediaRecorder API 　　提供音频和视频录制　　包含摄像头组件　　可用于Delphi / C ++ Builder XE5-10.3 　　完整版本中包含的源代码　　应用程序中的免版税分配　　Delphi and C++ Builder media recorder component for Android. 　　uses Android MediaRecorder API 　　provides audio and video recording 　　camera component is included 　　available for Delphi/C++ Builder XE5 - 10.3 　　source code included in full version 　　royalty free distribution in

Winsoft ComPort for FireMonkey v1.9-SEO狼术

阅读更多关于 Winsoft ComPort for FireMonkey v1.9-SEO狼术

　　Winsoft ComPort for FireMonkey v1.9 for Delphi & C++ Builder XE2 - 10.3 FULL SOURCE 　　用于Delphi和C ++ Builder XE2的FireMonkey v1.9的Winsoft ComPort-10.3完整源代码　　用于Windows串行通信的Delphi和C ++ Builder FireMonkey组件。　　与连接到串行端口的设备通信　　易于使用且功能强大　　使用多线程和重叠以获得最佳性能　　支持Delphi / C ++ Builder XE2-10.3 FireMonkey应用程序　　支持Windows 32 / 64bit 　　注册版本中包含的源代码　　应用程序中的免版税分配　　Delphi and C++ Builder FireMonkey component for serial communication for Windows. 　　communication with devices connected to serial port 　　easy of use and very powerful 　　uses multithreading and overlapping for maximum performance 　　supports