--------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DDJ00005 Date: 09/12/96 From: ZACK JONES Time: 12:52pm \/To: LEE ARONER (Read 4 times) Subj: Delphi Developer 2.01 (fu Howdy LEE! 19 Aug 96 08:01, LEE ARONER wrote to ZACK JONES: LA> Zack, what's on the update disk, do I *really* need it, and does LA> it cost anything for those of us that bought as soon as 2.0 came LA> out ?? You probably don't really need it, but it does have some additional internet OCX's included. It cost me $10.00 (ballpark figure) when I ordered my upgrade. Take Care, Zack Jones --- * Origin: Zack's Shack (912) 923-0642 (1:3611/18) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DDJ00006 Date: 09/12/96 From: JORGEN DE GIER Time: 12:29am \/To: BRYAN SMITH (Read 4 times) Subj: Delphi Date? Hallo Bryan, Bryan Smith schreef dit aan Don Krause: BS> or ... BS> Calendar1.Year := Calendar1.Year + 14 ; Hm, why not DecodeDate and EncodeDate? Much simpler and smaller. See the online help, Date/Time routines. Toedeloe, Jorgen de Gier --- GEcho 1.00 * Origin: Hoi! (2:280/606.9) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DDJ00007 Date: 09/13/96 From: GARY WEINFURTHER Time: 08:57am \/To: JOHAN NAGELS (Read 4 times) Subj: Ani-files Johan Nagels mentioned this to All: JN> Does anybody know a program for modifying ani-files (animated cursors)? That doesn't sound like a Delphi question. Please keep to the topic of Delphi. Thank you. ...Gary Weinfurther, DELPHI Moderator --- GoldED 2.41 * Origin: The Flying Circus BBS. (1:2410/905) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DDJ00008 Date: 09/06/96 From: PEDRO ALCANTARA Time: 03:18pm \/To: ALL (Read 4 times) Subj: .TIF Fax How can I fax a 320x200x256 .TIF? Thanks. PS. I heard of a freeware .VBX to do that?? Can I use it from 'D'2.0? --- * Origin: PARADISE BBS (93)4502699 (2:343/121) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DDJ00009 Date: 09/14/96 From: FRANCOIS PIETTE Time: 10:28am \/To: PETER HENDRIKS (Read 4 times) Subj: DOS FROM DDELPHI Salut Peter Hendriks ! Dans un message de Peter Hendriks dat du 11 Sep 96 21:52:00 il tait dit: PH>> Hi,how does one call DOS, actually a DOS exec file with parameters PH>> inDelphi. I know how to do it in Pascal, but can't find anything PH>> remotelysimilar in Delphi. Did it abandon ship? FP>WinExec, ShellExecute or CreateProcess. You have the choice ! PH> I've looked at the PH> CreateProcess, and ran away screaming... what anightmare to set up! I PH> don't think ShellExecute exists in Delphi 2, butwe'll have a look. ShellExecute exist only in Delphi 2. It is easy to use. To run a program, you have to 'open' it. You can also open any document file, ShellExecute will load the required application. In fact, ShellExecute is the function called by the Explorer when you double-click on an file name in the explorer. Amitis, {-Francois Piette-} --- SvFido 1.32 * Origin: OverByte BBS (Embourg-Belgium) 32-41-651395 V-FAST (2:293/2202) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DDJ00010 Date: 09/14/96 From: FRANCOIS PIETTE Time: 10:33am \/To: ALL (Read 4 times) Subj: TWSocket, Winsock, TCP/IP Salut All ! Some times ago I posted here the source code for a TWSocket object wich encapsulate the 'socket' paradigm form winsock, enabling you to easily write TCP/IP applications. I also posted the source code for a sample application, wich is actually a basic telnet server daemon. The sources are compatible with both Delphi 1 and Delphi 2. You'll find the complete, update source code on my home page located at: http://www.rtfm.be/fpiette. Look for the TnSrv item. My home page is presently in french, but I'll translate it in english in a few days. btw the source code is entirely commented in english. Of course it is free software ! Amitis, {-Francois Piette-} --- SvFido 1.32 * Origin: OverByte BBS (Embourg-Belgium) 32-41-651395 V-FAST (2:293/2202) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DDK00000 Date: 09/13/96 From: PETER COLLIS Time: 10:26am \/To: ALL (Read 4 times) Subj: TProgressBar component G'day All, I'm having problems setting the TProgressBar.Max (Win95 bar graph) property to 407307 (size of a file) without getting a Range Check Error "This is with Delphi 2" The Max propety is listed as being an integer which is suppose to be a 32 bit variable in Delphi 2, I assume the range checking code inside the object is still set at 32,767 and is raising the error. Is this a bug or am i expecting to much. [Later] I've got around this by setting the max property to 100 and writing a function that calculates the percentage from the filesize and current position values. Pete. EMail:pcollis@ozemail.com.au --- OMX/Blue Wave v2.12 * Origin: Gates of Hell (3:713/914.16) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DDK00001 Date: 09/13/96 From: PETER COLLIS Time: 03:44pm \/To: ALL (Read 4 times) Subj: Dynamic Arrays #2 G'day All, As a follow on from my previous message regarding dynamic memory allocation i've found if i do the following i end up with a dynamic array. type TmyRec = record name:array[0..39] of char; age:integer; end; MyRecArray = array[0..32767] of TmyRec; var Recs, count:integer; Prec:^MyRecArray; Rec:TmyRec; begin Recs := getRecordCount; Prec := AllocMem(Recs * sizeof(TmyRec)); for count := 0 to (Recs - 1) do begin getRecordFromFile(Rec); Prec[count].age := Rec.age; StrCopy(Prec[count].name, Rec.name); end; FreeMem(Prec); end. Now what i want to know is what is the correct syntax, is it Prec[count].age := Rec.age; or Prec^[count].age := Rec.age; I've tried both ways and they give the same results ie i've loaded 1140 records into an array without any errors using both ^ and not using ^ so what is the correct way?, Pointers weren't this hard in C. Pete. EMail:pcollis@ozemail.com.au --- OMX/Blue Wave v2.12 * Origin: Gates of Hell (3:713/914.16) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DDK00002 Date: 09/13/96 From: PETER COLLIS Time: 03:44pm \/To: ALL (Read 4 times) Subj: Dynamic Arrays G'day All, How do i create a dynamic array at run time. I have a file with user records in it that i want to load into an array, if i do the following i get a 'not an array' error. The code below is just an example and not the actual code. type TmyRec = record name:array[0..39] of char; age:integer; end; var Recs, count:integer; PRec:^TmyRec; Rec:TmyRec; begin Recs := getRecordCount; PRec := AllocMem(Recs * sizeof(TmyRec)); for count := 0 to (Recs - 1) do begin getRecordFromFile(Rec); Prec[count].age := Rec.age; StrCopy(Prec[count].name, Rec.Name); end; FreeMem(PRec); end. Pete. EMail:pcollis@ozemail.com.au --- OMX/Blue Wave v2.12 * Origin: Gates of Hell (3:713/914.16) --------------- FIDO MESSAGE AREA==> TOPIC: 269 DELPHI Ref: DDK00003 Date: 09/11/96 From: DIMITRI VAN DE VILLE Time: 11:03pm \/To: ALL (Read 4 times) Subj: code for installing a new Alias in BDE ?23:03:1909/11/96 Hello, When my database application starts up, I want to check the BDE if the alias (needed for my application) is available. If not, I want to install a new one, containing the right path... Can anyone tell me how to manage this (code) ? Regards, * Dimitri --- timEd-B10 * Origin: Base of Creativity... Get wired at +32-54-568436 (2:291/1301)