Hi,
I think I've found a bug on the FileExists function (sysutils) under Go32v2,
when I want to check if a directory exists.
FileExists( 'c:\winnt' ) will return False when compiled for Go32 but true
for Win32.
I guess that the Win32 version is doing rigth, since a directory is part of
the file s
[OT: Sorry if this was posted before but I'm having some weird problems with
email]
According to the docs
http://www.freepascal.org/docs-html/units/node23.html#SECTION0023660
00
"ExtractFileDir returns only the directory part of FileName, not including a
driveletter."
But it does ret
On Thu, Feb 13, 2003 at 02:49:49AM +0100, Iv?n Montes wrote:
> Hi,
>
> Maybe it's how it's supposed to be but if use :
>
> compareStr( 'hello', 'hello-bye' )
>
> I get 0, so they are equal.
>
> If one string is bigger than the other they should be different, isn't it?
>
> Otherways what can I
sorry list
just a test
___
fpc-pascal maillist - [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Iván Montes schrieb:
Hi,
Maybe it's how it's supposed to be but if use :
compareStr( 'hello', 'hello-bye' )
I get 0, so they are equal.
If one string is bigger than the other they should be different, isn't it?
I think so, too... but I don't have time to check this now, sorry,
hopefully som
Hi,
Maybe it's how it's supposed to be but if use :
compareStr( 'hello', 'hello-bye' )
I get 0, so they are equal.
If one string is bigger than the other they should be different, isn't it?
Otherways what can I use to check if two ansistrings are different?
TIA, Ivan
Hi!
Let's have a look for filename "C:A":
> function ExtractFileDir(const FileName: string): string;
> var i,j: longint;
> begin
>if FileName[2]=':' then j:=3
> else j:=1;
Now j = 3, pointing to the letter "A". OK.
>I := Length(FileName);
>while (I > 0) and
According to the docs
http://www.freepascal.org/docs-html/units/node23.html#SECTION0023660
00
"ExtractFileDir returns only the directory part of FileName, not including
a
driveletter."
But it does return the driveletter, so either the docs are mistaken or the
RTL.
If the docs ar
According to the docs
http://www.freepascal.org/docs-html/units/node23.html#SECTION0023660
00
"ExtractFileDir returns only the directory part of FileName, not including a
driveletter."
But it does return the driveletter, so either the docs are mistaken or the
RTL.
If the docs are rig
Hello!
The following should work under 32-bit windows-compatible os's:
***
Function FileExists (Const filename :String) :Boolean;
var
S: TSEARCHREC;
begin
R := FindFirst(Filename, faAnyFile, S);
Result := R = 0;
if R = 0 then FindClose(S);
end;
***
Status: Untested.
Caution: The circu
Hello, Ivan!
> Function FileExists (Const filename :String) :Boolean;
> begin
>//FileGetAttrib will return -1 if the file was not found
>//but I don't know if it will return -1 if the file exists but it's open
>result := boolean( FileGetAttr( filename ) XOR -1 );
> end;
I'll have a lo
Hi,
I think I've found a bug on the FileExists function (sysutils) under Go32v2,
when I want to check if a directory exists.
FileExists( 'c:\winnt' ) will return False when compiled for Go32 but true
for Win32.
I guess that the Win32 version is doing rigth, since a directory is part of
the file s
Hello!
> 3 generate n programs & compile them, o/p any compile errors
> 4 run tests (eg those in the cvs ??? or the ones in the program we are
> Sounds as if 3 & 4 are the difficult bits...
But I actually do step 3 on my PC, under linux. I tried the same before under
a popular operating system,
ok, so for the appropriate o/s we
repeat
1 just scan the local disks for eg the ppc386.exes, fp.exes, ppc.cfgs,
base*,zips, ide*.zips or whatever are appropriate for the o/s & o/p to
screen what versions etc the user has on the system
2 then look in ppc.cfg & check whether the references there
Matt D. Emson schrieb:
Having said all that, it works really well in Delphi, and I assume
Delphi mode (S2 or Sd). Does the TP or the ObjFPC mode support RTTI and
the Typinfo unit?
Yes, what you have described should work well in FPC, too.
- Sebastian
_
On woensdag, feb 12, 2003, at 04:17 Europe/Brussels, Anton Tichawa
wrote:
i long to be a member of the free pascal development team. comments are
welcome. are there any rites involved, such as programming a
4d-visualization
of the fourier transform or creating an aboriginal version of the VCL?
> This indeed only copies the pointer. if you want to do more
> than that, then you need to implement this yourself.
>
> TPersistent implements the 'Assign' method for this. You can
> create a descendent from TPersistent, override the Assign
> method, and then copy fields as necessary in the ne
On Wed, 12 Feb 2003, James Mills wrote:
> Hi all,
>
> With respect to classes (and perhaps also objects), how do you copy the
> contents of a class in memory (an object) to another?
>
> ie:
>
> var
> a: TClass;
>b: TClass;
>
> begin
> a := TClass.init;
> b := a; //This only copies
Hi all,
With respect to classes (and perhaps also objects), how do you copy the
contents of a class in memory (an object) to another?
ie:
var
a: TClass;
b: TClass;
begin
a := TClass.init;
b := a; //This only copies the pointer and doesn't work ??
end.
cheers
James
__
19 matches
Mail list logo
