...product based on what THEY think and
"I"
can't get the product "I" want "UNLESS" "I" agree with "THEM"
To me, their development cycle is pure ** ( that's 'S' and 'B' in reverse order)
I LOVE Delphi, and I HATE the path Inprise/Borland/etc have taken... you have no choice unless you agree...
An explanation of "why you can't use it" and "my application" would be prudent here.
Firstly, we have no clue what your application is/does
Secondly, "I'm not able to use it" is ambiguous. Does that mean, 1) you implemented the code and it doesn't work 2) you can't figure out how to integrate...
...available to see if there was a way to "skip" or "set" but to no avail.
I'd like to see it added, but then again, based on the price of the current Delphi, I'll be on D6 when I die. The price they charge for the product.... I've been "*held-up*" enough for my lifetime.
Regards and HTH,
JGS
Ryan:
Well the end point of a <TD.... is a </TD>, so right there you have a start and an end.
Beyond that, <A href= is a start point and </A> is an endpoint out of which you can extract "BUDDY NAME GOES HERE"
If there are multiple TD /TD pairs, search each one out, and then loop on the A /A...
You could put a procedure in like:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
Edit2.SetFocus;
Key := #$0;
end;
and pull the focus away from edit1
Regards and HTH,
JGS
Found this code on the web and saved it... haven't tried it yet.
This code basically starts/stops the webservice.
Uses WinSvc;
procedure TForm1.Button1Click(Sender: TObject);
var sc_h, sc_man : SC_HANDLE;
begin
sc_man := OpenSCManager(nil, nil, SERVICE_START);
if sc_man = 0 then...
OLVTM:
You could draw your circle continuously by using a timer and vary the interval to vary the speed at which it's drawn.
At that point, onbuttonclicks could be used to change the color etc.
Would advise a
Timer1.Enabled := False;
: button click event code
Timer1.Enabled := True;
in...
Gary:
Does your code typed in like mine not compile???
Mine compiles...
AND,
The help said that TIdTCPClient is a derivative of TIdTCPConnection which has Binding in it.
If you wouldn't mind.... just stick the code in there and tell me what happens, no compile, Address exception or???
If...
00thaphay:
I don't know if this will work, but it won't take long to try.
Basically if ReadLn isn't timing-out, the only way I know to make it not "wait" is by setting the socket to non-blocking.
This MAY do it... put this code in your timer event prior to the readln and give 'er a shot...
00thaphay:
The help states:
const ATimeout: integer = IdTimeoutInfinite
Time-out in milliseconds. Default value IdTimeoutInfinite. (-2)
:
:
Use a custom time-out (ATimeout) value to change the number of milliseconds to wait for a response from the peer connection before a time-out occurs...
delfy:
Any chance that data contains x'00'? Chances are the SQL server is written in VC++ and even though Delphi can handle strings with x'00' embedded in them, C will stop short.
Regards and HTH,
JGS
...do the following:
Procedure TForm.Timer1Timer(Sender:TObject);
Var
yada
Begin
Timer1.Enabled := False;
:
: Your code
:
Timer1.Enabled := True;
End;
I have found that multiple events can occur and without the disable you have x**3 interupts hanging out there ..
Regards and HTH,
JGS
FamWS:
add
OpenDialog1.Options := [ofNoChangeDir];
either in code or set it in the options if it is on your form.
Tested it both ways and was able to rename the directory immediately with the test app still running.
1.
Var
OpenDialog1 : TOpenDialog;
:
:
Begin
OpenDialog1 :=...
SilverSpecV:
With all due respect for my learned colleagues, I have stuck with D6.
The reasons are these:
I do a lot of TCP/IP programming and it does it.
I do a lot of direct serial port access and it does it.
I haven't a CLUE what to do with .NET (eh, call me old fashioned)
It's CHEAP...
AP81:
Thank you for your appreciation.
Although other posts have suggested alternative methods of "termination", one must stop to realize that during FormCreate, "we're not all there yet".
Yes, abrupt (I'm an ol' mainframer so we call it abend) termination of the program can cause some...
Adam:
I put together a little test:
procedure TForm1.FormCreate(Sender: TObject);
begin
MessageDlg('Going to quit',
mtWarning, [mbOK], 0);
Halt;
end;
And it's not there in the task manager afterward.
Regards and HTH,
JGS
I got a slightly different version from somewhere.... maybe a combination of the two???
//=================================================
//Run/Runonce program at system startup
//=================================================
Procedure OnStartup (const PgmTitle, CmdLine: String; RunOnce...
A little more information would be helpful.... do you want to read the whole file into memory at once? Does it NEED to all be in memory at once? .. or .. is it a record oriented file? .. or is it a variable-length-delimeted file .. or ..
???? When you say "...any size", is that record size...
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.