Several months ago I developed an application with Delphi 10.2 Tokyo using the VCL REST components. Up until this point a certificate check wasn't necessary.
Is there a way to disable the certificate check? It doesn't appear the client or request component has a property to toggle this on and...
Never mind. I figured it out. You got me to thinking, Glenn. ;)
Since I already have the handle for the window, I then can use "EnumChildWindows" to get the handle to the checkbox. Then do:
if SendMessage(hWndForCheckBoxControl, BM_GETCHECK, 0, 0) = BST_CHECKED then
begin...
Hi Glenn,
You asked how far along was I and if I was able to locate the form in question. I did answer both of those questions....I thought. :D With additional detail.
While I am able to load a form via a HOTKEY, verify it indeed exists (via caption), grab its window handle, make sure it has...
Hi Glenn,
Yes. The application does identify forms by caption and enters information on said forms (emulating keyboard input). I've created classes for each form that I'm currently working with. Each class contains properties for that form (what data can be entered on that form). Also, methods...
Has anyone done any development in regard to screen scraping?
For example, let's say a form on the screen (not Delphi, but a Java applet) has several checkboxes. I would need to verify which are checked or not and update user data accordingly.
Thank you for your response in advance.
//...
Hi Glenn,
Believe it or not I'm having to use Delphi 7 and TEventLogger does exist. [bigsmile] It's what Xerox currently has available. Hoping they upgrade to Delphi 10 here soon considering I'm having to update up to 160 applications written in Delphi.
I did eventually find the "u_eventlog"...
Okay. Would you happen to have the source code for these units as well? :D I'm converting an old Delphi 7 service to use a thread and have seen these units referenced on Stack Overflow, etc. However, source never provided.
u_eventlog
u_MyThread
ResonantEcho
thread102-791024
In regard to the above thread. May I get you to provide the values for the following constants you use in your code example?
STR_REGKEY_SVC
STR_REGVAL_IMAGEPATH
STR_REGVAL_DESCRIPTION
STR_INFO_SVC_DESC
STR_REGKEY_EVENTMSG
STR_REGVAL_EVENTMESSAGEFILE
STR_REGVAL_TYPESSUPPORTED...
I posted this earlier but not sure where it went. So... here I go again. ;)
We have an application that runs every x minutes and looks for a row that is in a 'READY' status. A row represents a batch to be processed. We used to run one instance of the application. However, our volume has...
Never mind, Borislav. I just realized I could probably add those conditions to the original query.
SELECT DebtID
FROM Table1
WHERE SUBSTRING(DebtID, 1, 1) IN ('F', 'G', 'N')
AND LEN(DebtID) = 14
AND NOT EXISTS(SELECT IndexValues
FROM Table2
WHERE...
Borislav,
Gotcha!
One last question. What if I want to narrow down the DebtIDs in Table1? For example. Let's say I want only DebtIDs that start with F, G, or N and are exactly 14 characters long? Where would I add that to the last query you supplied?
I know the syntax to check for those...
Borislave,
I guess what I was asking is doing the reverse more efficient? Less row scans?
SELECT DebtID
FROM Table1
LEFT JOIN Table2 ON charindex(Table1.DebtID, Table2.indexvalues) > 0
WHERE Table2.indexvalues IS NULL
100,000+ comparisons compared to 500+ million?
Thank you, Borislav. I'll give this a shot and get back with you. That is very straight forward and simple. I didn't realize you could us ON with a LIKE or CHARINDEX.
Another quick question. "Table 1" has only 100,000+ rows. "Table 2" has 500+ million. Is this the most efficient JOIN...
Table1:
Column: DebtID
Sample Value: G2010090058868
Table 2:
Column: IndexValue
Sample Value: prom~000000000~a~DCMS02~GRAYLG_0002101985~~~~~11/17/2009~~~0002101985~G2010090058868~~~~~00000129.001
I need to list all the "DebtID"s in "Table 1" that do not exist in "Table...
Why do I get an access violation when the "ISet" attributes are being set?
procedure CreateESIRXMLFile;
var
IESIRDocument : IXMLNSRType;
ISet : IXMLSETType;
begin
IESIRDocument := NewNSR;
// Batch Node
IESIRDocument.BATCH.ID := 'ESIR.201008160001'...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.