Delphi Encryption Compendium x Delphi 7
"Clayton Aguiar" <[email protected]> Tue, 12 Aug 2003 11:09:30 -0300
| Newsgroups | gmane.comp.lang.delphi.programming |
|---|---|
| Message-ID | <[email protected]> |
Hi, I'm posting here, hoping someone can help me. Since the time I used Delphi 3 or 4, I use the Delphi Ecncryption Compendium (DEC). The Part I of this package is free, and contains a lot of cyphering and hashing algorithms. Its author is Hagen Reddmann ([email protected]). It always worked fine. But when compiling the package to Delphi 7, some file requirements forced me to get some .PAS from \Source. This isn't the real problem. The Problem: The demo application alerts to a Self Test Failure in the hash algorithms/classes, and indeed one of the cipher modes (cmECB, to be accurate) is failing for some algorithms. I fired an e-mail to the author, but perhaps someone here may help me. Thanks in advance. Clayton. > -----Original Message----- > From: [email protected] > [mailto:[email protected]] > Sent: Thursday, August 07, 2003 9:28 AM > To: [email protected] > Subject: [Delphi] Digest Number 2261 > > > ------------------------ Yahoo! Groups Sponsor > ---------------------~--> Buy Ink Cartridges or Refill Kits > for Your HP, Epson, Canon or Lexmark Printer at Myinks.com. > Free s/h on orders $50 or more to the US & Canada. > http://www.c1tracking.com/l.asp?cid=5511 > http://us.click.yahoo.com/l.m7sD/LIdGAA/qnsNAA/i7folB/TM > -------------------------------------------------------------- > -------~-> > > CodeCoffer - new Delphi code protection Tool! > http://www.delphicollection.com/public/CodeCoffer.htm > --------------------------------------------------------------- > Unsubscribe:[email protected] > List owner:[email protected] > --------------------------------------------------------------- > -------------------------------------------------------------- > ---------- > > There are 19 messages in this issue. > > Topics in this digest: > > 1. three tier app > From: Eduardo Duran Cardenas <[email protected]> > 2. Re: DLL Problem (Access Violation Error) > From: "Ramin" <[email protected]> > 3. RE: DLL Problem (Access Violation Error) > From: "rizky" <[email protected]> > 4. RE: Re: Problem closing DLL load direct And indirect > From: "rizky" <[email protected]> > 5. problem closing DLL load direct And indirect - > solved - finished > From: "rizky" <[email protected]> > 6. Re: Kylix > From: Alberto Narduzzi <[email protected]> > 7. Re: Kylix > From: Shawn Tan <[email protected]> > 8. Print/Print Preview components > From: "Jeff Davis" <[email protected]> > 9. RE: Print/Print Preview components > From: "Jeff Cook" <[email protected]> > 10. Re: Execute a DLL function > From: "davidmuinos" <[email protected]> > 11. TChart Sizing > From: "Luke Young" <[email protected]> > 12. Re: YNT: 3d graphic (+animation) component for delphi > From: Eddy Prahasta <[email protected]> > 13. YNT: 3d graphic (+animation) component for delphi > From: "Metin Murat ELBEYLI" <[email protected]> > 14. Kylix 3 IDE crash. > From: "fatih olcer" <[email protected]> > 15. Problem regarding Database > From: "Munjal Gajjar" <[email protected]> > 16. RE: Print/Print Preview components > From: "Shkolnik M." <[email protected]> > 17. query returns no record > From: "Brigitte Spatz" <[email protected]> > 18. RE: three tier app > From: "Marcelo Mrack" <[email protected]> > 19. Re: query returns no record > From: "Fabiano Paolini" <[email protected]> > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 1 > Date: Wed, 6 Aug 2003 09:45:50 -0500 > From: Eduardo Duran Cardenas <[email protected]> > Subject: three tier app > > Hi ppl, I have a three tier app (D4), using Midas & Socket > Server, and I have the following problem. When I send a > TStringList with a String > 8k it returns a windows socket > error (10014) on API 'recv' Note! I have already installed > the Update Pack # 3 Any clue will be appreciated. > > Eduardo Duran C. > TFM, Departamento TI > 83057900 ext 7508 > > > > > > > [Non-text portions of this message have been removed] > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 2 > Date: Wed, 06 Aug 2003 06:34:37 -0000 > From: "Ramin" <[email protected]> > Subject: Re: DLL Problem (Access Violation Error) > > Dear Shahab, > > Hi, I think I can help you, so would you mind send me your > sources to this > address : [email protected]. > > Thanks, > Ramin > > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 3 > Date: Wed, 6 Aug 2003 13:42:41 +0700 > From: "rizky" <[email protected]> > Subject: RE: DLL Problem (Access Violation Error) > > I Think You have the same problem with me and I was > consulting this problem here you might want to follow my > email by its subject 'problem closing DLL load direct And indirect' > > Richness Is Not Measure By How Much You Have... > But How Less You Need.... > > RichKey > > > > > -----Original Message----- > From: Shahab-o-ddin Mokhtari [mailto:[email protected]] > Sent: Wednesday, August 06, 2003 11:30 AM > To: [email protected] > Subject: [Delphi] DLL Problem (Access Violation Error) > > > Hi all > I was wrote a dll, but when I call its functions in my > application, I got Access Violation on address X error !!! :( > Can anyone help me hoe to currcet this ?! If you want, I can > send you my dll source, its interface and parts of my application ! > > Thnx in advance > > Shahab :) > > > Sincerely Yours > Shahab-o-ddin Mokhtari > > [http://Ceramic81.150m.com] > [[email protected]] > [http://ShahabM.8m.com] > > > --------------------------------- > Do you Yahoo!? > Yahoo! SiteBuilder - Free, easy-to-use web site design software > > [Non-text portions of this message have been removed] > > > > > CodeCoffer - new Delphi code protection Tool! > http://www.delphicollection.com/public/CodeCoffer.htm > --------------------------------------------------------------- > Unsubscribe:[email protected] > List owner:[email protected] > --------------------------------------------------------------- > > Your use of Yahoo! Groups is subject to > http://docs.yahoo.com/info/terms/ > > > > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 4 > Date: Wed, 6 Aug 2003 13:47:55 +0700 > From: "rizky" <[email protected]> > Subject: RE: Re: Problem closing DLL load direct And indirect > > If I omit the freelibrary, then how I free the dll from the > memory...now I tried to learn about freelibraryandexitthread > methode, I thought it might answer..do you know something > about it...im afraid the problem is about its thread > thing...or the handle thing...well I should read more about > it...any one have a suggestion ? > > Richness Is Not Measure By How Much You Have... > But How Less You Need.... > > RichKey > > > > > -----Original Message----- > From: Ramin [mailto:[email protected]] > Sent: Wednesday, August 06, 2003 4:31 AM > To: [email protected] > Subject: [Delphi] Re: Problem closing DLL load direct And indirect > > > Hi, > > This time try to omit the FreeLibrary code and then see the > result, I think > the EAccessViolation occured when the Applicaiton wants to > free the Library, > but before you have used FreeLibrary. > > Just omit FreeLibrary and then see the result. > > Yours, > Ramin > > > > > CodeCoffer - new Delphi code protection Tool! > http://www.delphicollection.com/public/CodeCoffer.htm > --------------------------------------------------------------- > Unsubscribe:[email protected] > List owner:[email protected] > --------------------------------------------------------------- > > Your use of Yahoo! Groups is subject to > http://docs.yahoo.com/info/terms/ > > > > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 5 > Date: Wed, 6 Aug 2003 15:10:05 +0700 > From: "rizky" <[email protected]> > Subject: problem closing DLL load direct And indirect - > solved - finished > > The Problem is in the strPcopy and my variable when something > to do with assigning memory, (Thanks to Klaus Gerding...). > > For All the member that participating thanks a lot for your > time and ideas, I hope this can help other programmers to > understand more about dll as its help me > > Thank You Guys Keep On Rockin \m/ And Peace ... > > Present Code : > > procedure TfrmMain.Button1Click(Sender: TObject); > var > lhandle : tHandle; > sForm:tShowForm; > begin > if cbListModule.Text <> '' then > begin > lHandle:=LoadLibrary(PChar(cbListModule.Text+'.dll')); > //Changing Here > try > if lHandle = 0 then > raise eDllLoadError.create('Dll Tidak Ada'); > @sForm:= GetProcAddress(lhandle,'ShowForm'); > if not (@sform = nil) then > begin > > showform; > end > else > RaiseLastWin32Error; > finally > FreeLibrary (lhandle); > end; > end; > end; > > > > -----Original Message----- > From: Klaus Gerding [mailto:[email protected]] > Sent: Wednesday, August 06, 2003 2:15 PM > To: [email protected] > Subject: Re: [Delphi-JEDI] problem closing DLL load direct > And indirect > > > your command > > cDll := StrPCopy(cDll,cbListModule.Text+'.dll'); //get DLL > > copies text to an pchar. but there is no memory behind this pointer! > > > help description from delphi > > StrPCopy copies a Pascal-type string Source into a null-terminated > string Dest. It returns a pointer to Dest. > StrPCopy does not perform any length checking. > > > bye, > klaus > > > The destination buffer must have room for at least > Length(Source)+1 characters. > > rizky schrieb: > > > > i have a problem when closing dll form which is load indirect (list > > 01)...the error message EAccessviolation keep appear when i > click the > > close window button (x) or use the ' form.close ' syntax...but if i > load > > the dll directly(list 02) the problem doesn't appear....So > whats the > > different between that two method ?, which one should i use best ?, > is > > there any other technique that i can use ?, and how can i > get out from > > the error message if i want to use the indirect technique ? > > > > thanks a bunch guys....i really appriciate any help and suggestion > that > > given to this message... > > > > > > list 01 : > > procedure TfrmMain.Button1Click(Sender: TObject); > > var > > lhandle : tHandle; > > sForm:tShowForm; > > cDll:pChar; > > begin > > if cbListModule.Text <> '' then > > begin > > cDll := StrPCopy(cDll,cbListModule.Text+'.dll'); > //get DLL > > Name from combobox > > lHandle:=LoadLibrary(cDll); // Load DLL indirect > > try > > if lHandle = 0 then > > raise eDllLoadError.create('Dll Tidak Ada'); > > @sForm:= GetProcAddress(lhandle,'ShowForm'); > > if not (@sform = nil) then > > begin > > showform; > > end > > else > > RaiseLastWin32Error; > > finally > > FreeLibrary(lhandle); > > end; > > end; > > end; > > > > > > > > list 02 : > > procedure TfrmMain.Button1Click(Sender: TObject); > > var > > lhandle : tHandle; > > sForm:tShowForm; > > cDll:pChar; > > begin > > if cbListModule.Text <> '' then > > begin > > > lHandle:=LoadLibrary('RekapPertumbuhanAngkatan.dll'); // Load > > DLL Direct > > try > > if lHandle = 0 then > > raise eDllLoadError.create('Dll Tidak Ada'); > > @sForm:= GetProcAddress(lhandle,'ShowForm'); > > if not (@sform = nil) then > > begin > > showform; > > end > > else > > RaiseLastWin32Error; > > finally > > FreeLibrary(lhandle); > > end; > > end; > > end; > > > > > > > > > > Richness Is Not Measure By How Much You Have... > > > > But How Less You Need.... > > > > > > > > RichKey > > > > > > > > > > > > [Non-text portions of this message have been removed] > > > > > > To unsubscribe from this group, send an email to: > > [email protected] > > > > > > > > Your use of Yahoo! Groups is subject to > http://docs.yahoo.com/info/terms/ > > > > Yahoo! Groups Sponsor > > <http://rd.yahoo.com/M=259395.3614674.4902533.1261774/D=egroup > web/S=1705 > 115362:HM/A=1524963/R=0/SIG=12o885gmo/*http://hits.411web.com/ > cgi-bin/au > toredir?camp=556&lineid=3614674&prop=egroupweb&pos=HM> > > <http://us.adserver.yahoo.com/l?M=259395.3614674.4902533.12617 > 74/D=egrou > pmail/S=:HM/A=1524963/rand=766269274> > > To unsubscribe from this group, send an email to: > [email protected] > > > > Your use of Yahoo! Groups is subject to the Yahoo! Terms of > Service <http://docs.yahoo.com/info/terms/> . > > > > [Non-text portions of this message have been removed] > > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 6 > Date: Wed, 6 Aug 2003 11:51:29 +0200 > From: Alberto Narduzzi <[email protected]> > Subject: Re: Kylix > > Jeff, > > > Loaded up a project from the examples library and when I try to run > > the > example it hangs the IDE. > > I don't know what it's due to... > > > I've tried to run the binary from an Xterm command line and > I get some > exception error about a PAnsiString. > > You need to export the path to the Borland qt libraries with > the following, > assuming kylix is installed in /home/username/kylix > > export LD_LIBRARY_PATH = /home/username/kylix/bin > > then you'll be able to run it from an xterm. You may want to > add that command > to your .profile or .bashrc files... > > > Moreover, if you want to run the binaries on a different > machine you'll need > to do the follwing: > > 1. copy the file > /home/username/kylix/bin/libborqt-6.9.0-qt2.3.so to a folder > on that machine, say /home/username/kylixshared > 2. Now, in the same folder, create a link to that file and call it > libborqt-6.9-qt2.3.so (note the missing ".0" in this one...) > 3. On that machine, then, export LD_LIBRARY_PATH = > /home/username/kylixshared > > > HTH > > Cheers, > Batman > > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 7 > Date: Thu, 7 Aug 2003 01:07:56 +0800 > From: Shawn Tan <[email protected]> > Subject: Re: Kylix > > -----BEGIN PGP SIGNED MESSAGE----- > Hash: SHA1 > > > Ok, I downloaded Kylix Open Edition and installed it on my fresh new > > Read Hat 9. Installation went flawless. Loaded up a > project from the > > examples library and when I try to run the example it hangs the IDE. > > Well, the good news is that I've got Kylix3 OE running on RH9 as well, > and i've been using it for a long time.. > > I've also experienced this case of 'hang' IDE.. it happens in > all kinds > of places.. like when you try to open a file and you click on the > dropdown browse menu, and when you open the dialogs to configure the > IDE.. > > My solution to the problem is just to wait it out.. although it > 'hangs'.. after waiting a few minutes, it works fine.. The way I get > around it is by changing the way I use the IDE.. > > It seems to be a problem with Kylix3 as I've used Kylix1 and > Kylix2 and > they didn't have this problem (although they had other problems).. > > > I've tried to run the binary from an Xterm command line and > I get some > > exception error about a PAnsiString. > > > > Well, I'll just guess here: > 1) try running as ROOT and see if that works.. (: I've had > some programs > fail on me just because I'm not running as root.. > > > Tried a couple of other examples along with a Delphi project I > > converted to use CLX. All produce the same results. > > I've been using Kylix3 for months now.. no problems now.. there are > certainly bugs, but I'm happy with it as it is for the moment.. > > > > > Anyone out there have any experience with this or can point > me in the > > right direction. Looks like this WinBlows to Linux > conversion project > > that was due 2 months ago will be a little late!!!! > > > > Thanks > > > > Jeff Steinkamp > > > > > > ------------------------ Yahoo! Groups Sponsor > > ---------------------~--> Rent DVDs from home. > > Over 14,500 titles. Free Shipping > > & No Late Fees. Try Netflix for FREE! > > http://us.click.yahoo.com/BVVfoB/hP.FAA/ySSFAA/i7folB/TM > > > --------------------------------------------------------------------- > > ~-> > > > > CodeCoffer - new Delphi code protection Tool! > > http://www.delphicollection.com/public/CodeCoffer.htm > > --------------------------------------------------------------- > > Unsubscribe:[email protected] > > List owner:[email protected] > > --------------------------------------------------------------- > > > > Your use of Yahoo! Groups is subject to > > http://docs.yahoo.com/info/terms/ > > > > > > > > > - -- > with metta, > Shawn Tan. > ============================================================== > ========= > ICQ UIN: 1802628 keyserver.net: F9BA3B9A > counter.li.org: 297959 > > -----BEGIN PGP SIGNATURE----- > Version: GnuPG v1.2.1 (GNU/Linux) > > iD8DBQE/MTXs9KUEj/m6O5oRAvJ4AJ4iT7DhPIbwEVuvc01HW29oNZBNYgCgnnOs > CxoJB900TNI12lrYn+mbUvA= > =YXaZ > -----END PGP SIGNATURE----- > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 8 > Date: Wed, 6 Aug 2003 17:58:52 -0700 > From: "Jeff Davis" <[email protected]> > Subject: Print/Print Preview components > > Hi, > > I am looking for professional, commercial Print/Print Preview > components for Delphi4. > > Price is not a factor. Hyperlinks are especially greatly appreciated. > > Thanks! > > [Non-text portions of this message have been removed] > > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 9 > Date: Thu, 7 Aug 2003 14:06:26 +1200 > From: "Jeff Cook" <[email protected]> > Subject: RE: Print/Print Preview components > > -----Original Message----- > From: Jeff Davis [mailto:[email protected]] > Sent: Thursday, 7 August 2003 12:59 p.m. > To: [email protected] > Subject: [Delphi] Print/Print Preview components > > Hi, > > I am looking for professional, commercial Print/Print Preview > components > for Delphi4. > > Price is not a factor. Hyperlinks are especially greatly appreciated. > > Thanks! > ----------------------------------------------------------------- > > Jeff > > I have had success with ACE Reporter - done everything I've > wanted it to > do with no great complications. > > http://www.sct-associates.com/ > > Cheers > > Jeff > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 10 > Date: Thu, 07 Aug 2003 04:10:34 -0000 > From: "davidmuinos" <[email protected]> > Subject: Re: Execute a DLL function > > Thanks guys it worked just fine ! > Thanks a lot ! > > > --- In [email protected], "davidmuinos" > <davidmuinos@u...> wrote: > > HI guys, I'd like to execute a function of my DLL in my > application. > > > > I've already found two functions in Windows SDK : LoadLibrary and > > GetProcAddress. They worked, got the Address of my DLL's > function , > > but how can i execute it ? > > One more thing : the DLL's function has parameters. > > > > > > Thanks very much. > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 11 > Date: Thu, 07 Aug 2003 08:20:48 -0000 > From: "Luke Young" <[email protected]> > Subject: TChart Sizing > > Hi, > > Is there a way that I can get the TChart Chart rectangle to be a fixed > size. At the moment if I set the Height and Width to 100, then > populate the chart, the axis labels will be 0 to 100 but this squashes > the actual chart. > > Instead I want the chart canvas to get bigger but the chart remain the > same size and not be effected by the axis labels, markers and the > chart legend. > > Any ideas? I am sure there is a property setting but I have'nt found > it yet.... > > Cheers > > Luke > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 12 > Date: Thu, 7 Aug 2003 15:46:42 +0700 (ICT) > From: Eddy Prahasta <[email protected]> > Subject: Re: YNT: 3d graphic (+animation) component for delphi > > > Dear all, > > Thank Metin, I've downloaded and install that nice 3d tool. > But when i drop down the TGLSceneViewer component, the message "This > program has performed an ilegal operation and will be shut > down..." always > appear. How to fix that problem? > > Regards, > > Eddy > > On Tue, 5 Aug 2003, Metin Murat Elbeyli ( Serel Manisa ) wrote: > > > eddy, > > > > you must try to use "GLScene". > > visit http://www.glscene.org > > > > metin. > > > > -----Özgün Ä°leti----- > > Kimden: Eddy Prahasta [mailto:[email protected]] > > GönderilmiÅŸ: Sal 05.08.2003 09:20 > > Kime: [email protected] > > Bilgi: > > Konu: [Delphi] 3d graphic (+animation) component for delphi > > > > > > > > > > Hi all, > > > > I need to develop the application that use 3d graphic > its animation > > (wire framed) by delphi. Anyone could help me to inform > me the easy way to > > do it by delphi? Source code samples or component software. > > > > Regards, > > > > Eddy Prahasta > > > > > > > > > > CodeCoffer - new Delphi code protection Tool! > > http://www.delphicollection.com/public/CodeCoffer.htm > > --------------------------------------------------------------- > > Unsubscribe:[email protected] > > List owner:[email protected] > > --------------------------------------------------------------- > > > > Your use of Yahoo! Groups is subject to > http://docs.yahoo.com/info/terms/ > > > > > > > > > > > > > > [Non-text portions of this message have been removed] > > > > > > > > CodeCoffer - new Delphi code protection Tool! > > http://www.delphicollection.com/public/CodeCoffer.htm > > --------------------------------------------------------------- > > Unsubscribe:[email protected] > > List owner:[email protected] > > --------------------------------------------------------------- > > > > Your use of Yahoo! Groups is subject to > http://docs.yahoo.com/info/terms > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 13 > Date: Fri, 8 Aug 2003 12:07:48 +0300 > From: "Metin Murat ELBEYLI" <[email protected]> > Subject: YNT: 3d graphic (+animation) component for delphi > > eddy, > please write this problem to news groups of GLScene (GLScene > GURUs live > there). > > metin. > > > > > > ----- Original Message ----- > > From: "Eddy Prahasta" <[email protected]> > > To: <[email protected]> > > Sent: Thursday, August 07, 2003 11:46 AM > > Subject: Re: YNT: [Delphi] 3d graphic (+animation) > component for delphi > > > > > > > > > > Dear all, > > > > > > Thank Metin, I've downloaded and install that nice 3d tool. > > > But when i drop down the TGLSceneViewer component, the > message "This > > > program has performed an ilegal operation and will be > shut down..." > always > > > appear. How to fix that problem? > > > > > > Regards, > > > > > > Eddy > > > > > > On Tue, 5 Aug 2003, Metin Murat Elbeyli ( Serel Manisa ) wrote: > > > > > > > eddy, > > > > > > > > you must try to use "GLScene". > > > > visit http://www.glscene.org > > > > > > > > metin. > > > > > > > > -----Ã-zgün Ä°leti----- > > > > Kimden: Eddy Prahasta [mailto:[email protected]] > > > > GönderilmiÅY: Sal 05.08.2003 09:20 > > > > Kime: [email protected] > > > > Bilgi: > > > > Konu: [Delphi] 3d graphic (+animation) component for delphi > > > > > > > > > > > > > > > > > > > > Hi all, > > > > > > > > I need to develop the application that use 3d graphic > its animation > > > > (wire framed) by delphi. Anyone could help me to inform > me the easy > way > > to > > > > do it by delphi? Source code samples or component software. > > > > > > > > Regards, > > > > > > > > Eddy Prahasta > > > > > > > > > > > > > > > > > > > > CodeCoffer - new Delphi code protection Tool! > > > > http://www.delphicollection.com/public/CodeCoffer.htm > > > > --------------------------------------------------------------- > > > > Unsubscribe:[email protected] > > > > List owner:[email protected] > > > > --------------------------------------------------------------- > > > > > > > > Your use of Yahoo! Groups is subject to > > http://docs.yahoo.com/info/terms/ > > > > > > > > > > > > > > > > > > > > > > > > > > > > [Non-text portions of this message have been removed] > > > > > > > > > > > > > > > > CodeCoffer - new Delphi code protection Tool! > > > > http://www.delphicollection.com/public/CodeCoffer.htm > > > > --------------------------------------------------------------- > > > > Unsubscribe:[email protected] > > > > List owner:[email protected] > > > > --------------------------------------------------------------- > > > > > > > > Your use of Yahoo! Groups is subject to > http://docs.yahoo.com/info/terms > > > > > > > > > > > > CodeCoffer - new Delphi code protection Tool! > > > http://www.delphicollection.com/public/CodeCoffer.htm > > > --------------------------------------------------------------- > > > Unsubscribe:[email protected] > > > List owner:[email protected] > > > --------------------------------------------------------------- > > > > > > Your use of Yahoo! Groups is subject to > http://docs.yahoo.com/info/terms/ > > > > > > > > > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 14 > Date: Thu, 7 Aug 2003 08:22:55 +0300 > From: "fatih olcer" <[email protected]> > Subject: Kylix 3 IDE crash. > > Hi, > > Kylix3 IDE crashes without any error message when I try to run(F9) > application from kylix3 IDE. Any ideas? > > Kylix Enterprise trial, > op sys : rh9 > > thanks. > > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 15 > Date: Thu, 7 Aug 2003 13:41:16 +0530 > From: "Munjal Gajjar" <[email protected]> > Subject: Problem regarding Database > > Hi, > > I have been working in Delphi Graphics for last few years. This is my > first database project. > > I am developing a multi user database application. For that, > I am using > ADO. > Now, same application is running on two different machines at the same > time. > When, first application is executing this procedure, it locks the > connections. And the other application can’t execute this procedure at > that time. > > In short, what I want to do is, two different machines can > save data at > the same time. For that, Please suggest me, what should I do. > > > Here is a sample code > > > function TDataDiaDetect.GetNewID() : integer; > var > E : Exception; > t : TDataSetState; > begin > try > > tblTempID.LockType :== ltOptimistic; > tblTempID.Open(); > CONDiaData.BeginTrans(); > tblTempID.SafeCallException() > tblTempID.Edit(); > tblTempID.FieldByName('lastID').Value > :=tblTempID.FieldByName('lastID').AsInteger + 1; > result :== tblTempID.FieldByName('lastID').Value; > t :== tblTempID.State; > tblTempID.Post(); > t :== tblTempID.State; > CONDiaData.CommitTrans; > tblTempID.Close(); > except > CONDiaData.RollbackTrans; > ShowMessage('Error in GetNewID ' + E.Message); > end; > > > Any help will be appreciated, > > Munjal Gajjar > > > > --- > > [Non-text portions of this message have been removed] > > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 16 > Date: Thu, 7 Aug 2003 13:32:03 +0300 > From: "Shkolnik M." <[email protected]> > Subject: RE: Print/Print Preview components > > Check SMReport: http://www.scalabium.com/smr > > With best regards, Mike Shkolnik > EMail: [email protected] > http://www.scalabium.com > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 17 > Date: Thu, 7 Aug 2003 13:11:18 +0200 > From: "Brigitte Spatz" <[email protected]> > Subject: query returns no record > > SELECT P.Register, P.[First Name], AE.[Kind Of Event], AP.ID > FROM Assured_Person AS AP, Person AS P, Assurance_Event AS AE > WHERE AP.ID = AE.ID > AND AP.[Person ID] = P.ID > AND P.Register = :Register > AND AE.[Kind Of Event] = :Event > > returns the correct records when run from within Access. When run from > Delphi, it only returns the correct record on the first run but on > consecutive calls to the following function returns a recordcount of 0 > although both parameters have the correct values that do > return a record > in Access: > > procedure MakeTocLetters(NextRegister, Event: integer); > begin > with frmDMGenerator.qryGeneratorAssuranceEventDetails do > begin > Parameters[0].Value := Event; > Parameters[1].Value := NextRegister; > Open; > if RecordCount > 0 then > begin > First; > while not EOF do > begin > strScript := strScript + 'insDoc(' + > AssuranceEventConcatenated(Event) + > ', gLnk(0,' + QuotedStr(_('Letter for ') + '11-' + > Fields[3].AsString) > + ', ' + QuotedStr('11-' + IntToStr(NextRegister) + '-' + > IntToStr(Event) + '-' + Fields[3].AsString + > '.htm') + '))' + > #13#10; > Next; > end; > end; > Close; > end; > end; > > I'm sure it must be something obvious but I can't see it. Any help > appreciated. > > TIA. > > Brigitte > > > > [Non-text portions of this message have been removed] > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 18 > Date: Thu, 7 Aug 2003 08:16:42 -0300 > From: "Marcelo Mrack" <[email protected]> > Subject: RE: three tier app > > Do you read instalation notes? Many other things they are > presents and we don´t know... > > -----Original Message----- > From: Eduardo Duran Cardenas [mailto:[email protected]] > Sent: quarta-feira, 6 de agosto de 2003 11:46 > To: [email protected] > Subject: [Delphi] three tier app > > > Hi ppl, I have a three tier app (D4), using Midas & > Socket Server, and I > have the following problem. > When I send a TStringList with a String > 8k it returns > a windows socket > error (10014) on API 'recv' > Note! I have already installed the Update Pack # 3 > Any clue will be appreciated. > > Eduardo Duran C. > TFM, Departamento TI > 83057900 ext 7508 > > > > > > > [Non-text portions of this message have been removed] > > > > Yahoo! Groups Sponsor > ADVERTISEMENT > Click Here! > <http://rd.yahoo.com/M=244522.3656190.4921519.1261774/D=egroup > web/S=1705115362:HM/A=1595053/R=0/SIG=124mh1h7k/*http://ashnin .com/clk/muryutaitakenattogyo?YH=3656190&yhad=> 1595053> > > <http://us.adserver.yahoo.com/l?M=244522.3656190.4921519.12617 > 74/D=egroupmail/S=:HM/A=1595053/rand=208822372> > > CodeCoffer - new Delphi code protection Tool! > http://www.delphicollection.com/public/CodeCoffer.htm > --------------------------------------------------------------- > Unsubscribe:[email protected] > List owner:[email protected] > --------------------------------------------------------------- > > Your use of Yahoo! Groups is subject to the Yahoo! > Terms of Service <http://docs.yahoo.com/info/terms/> . > > > > > [Non-text portions of this message have been removed] > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > Message: 19 > Date: Thu, 7 Aug 2003 14:00:38 +0200 > From: "Fabiano Paolini" <[email protected]> > Subject: Re: query returns no record > > May be that the problem is using RecordCount. > Try using BOF and EOF (both true means empty query) or, if > present, Empty > property. > > Fabiano > > ----- Original Message ----- > From: "Brigitte Spatz" <[email protected]> > To: <[email protected]> > Sent: Thursday, August 07, 2003 1:11 PM > Subject: [Delphi] query returns no record > > > > SELECT P.Register, P.[First Name], AE.[Kind Of Event], AP.ID > > FROM Assured_Person AS AP, Person AS P, Assurance_Event AS AE > > WHERE AP.ID = AE.ID > > AND AP.[Person ID] = P.ID > > AND P.Register = :Register > > AND AE.[Kind Of Event] = :Event > > > > returns the correct records when run from within Access. > When run from > > Delphi, it only returns the correct record on the first run but on > > consecutive calls to the following function returns a > recordcount of 0 > > although both parameters have the correct values that do > return a record > > in Access: > > > > procedure MakeTocLetters(NextRegister, Event: integer); > > begin > > with frmDMGenerator.qryGeneratorAssuranceEventDetails do > > begin > > Parameters[0].Value := Event; > > Parameters[1].Value := NextRegister; > > Open; > > if RecordCount > 0 then > > begin > > First; > > while not EOF do > > begin > > strScript := strScript + 'insDoc(' + > > AssuranceEventConcatenated(Event) + > > ', gLnk(0,' + QuotedStr(_('Letter for ') + '11-' + > > Fields[3].AsString) > > + ', ' + QuotedStr('11-' + IntToStr(NextRegister) + '-' + > > IntToStr(Event) + '-' + Fields[3].AsString + > '.htm') + '))' + > > #13#10; > > Next; > > end; > > end; > > Close; > > end; > > end; > > > > I'm sure it must be something obvious but I can't see it. Any help > > appreciated. > > > > TIA. > > > > Brigitte > > > > > > > > [Non-text portions of this message have been removed] > > > > > > > > CodeCoffer - new Delphi code protection Tool! > > http://www.delphicollection.com/public/CodeCoffer.htm > > --------------------------------------------------------------- > > Unsubscribe:[email protected] > > List owner:[email protected] > > --------------------------------------------------------------- > > > > Your use of Yahoo! Groups is subject to > http://docs.yahoo.com/info/terms/ > > > > > > > > > ______________________________________________________________ > __________ > ______________________________________________________________ > __________ > > > > Your use of Yahoo! Groups is subject to > http://docs.yahoo.com/info/terms/ > > > --- > Incoming mail is > certified Virus Free. > Checked by AVG anti-virus system (http://www.grisoft.com). > Version: 6.0.506 / Virus Database: 303 - Release Date: 1/8/2003 > > > --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.507 / Virus Database: 304 - Release Date: 4/8/2003 ------------------------ Yahoo! Groups Sponsor ---------------------~--> Buy Ink Cartridges or Refill Kits for Your HP, Epson, Canon or Lexmark Printer at Myinks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511 http://us.click.yahoo.com/l.m7sD/LIdGAA/qnsNAA/i7folB/TM ---------------------------------------------------------------------~-> CodeCoffer - new Delphi code protection Tool! http://www.delphicollection.com/public/CodeCoffer.htm --------------------------------------------------------------- Unsubscribe:[email protected] List owner:[email protected] --------------------------------------------------------------- Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/