Re: [fpc-devel] LoadLibrary fails if called from a DLL

2007-07-09 Thread Marco van de Voort
> I fixed DLL related a few weeks ago. You need to get more fresh snapshot and 
> test it.

(I happened to test a couple of Unix related problems, and the issues are
still there, most notably the initialization sections not being run.

I assume that is not by design?!?)

___
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel


Re: [fpc-devel] LoadLibrary fails if called from a DLL

2007-07-09 Thread Mark - WBIsoft.COM

Yeah, I spooted that with a windows DLL as well !


- Original Message - 
From: "Marco van de Voort" <[EMAIL PROTECTED]>

To: "FPC developers' list" 
Sent: Monday, July 09, 2007 9:22 AM
Subject: Re: [fpc-devel] LoadLibrary fails if called from a DLL


I fixed DLL related a few weeks ago. You need to get more fresh snapshot 
and test it.


(I happened to test a couple of Unix related problems, and the issues are
still there, most notably the initialization sections not being run.

I assume that is not by design?!?)

___
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel


--
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.476 / Virus Database: 269.10.2/890 - Release Date: 07/07/2007 
15:26





___
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel


Re: [fpc-devel] LoadLibrary fails if called from a DLL

2007-07-09 Thread Jonas Maebe


On 09 Jul 2007, at 10:22, Marco van de Voort wrote:

(I happened to test a couple of Unix related problems, and the  
issues are

still there, most notably the initialization sections not being run.


That's not "unix related", as the initialization (and finalization)  
sections run just fine on Mac OS X.



Jonas
___
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel


Re: [fpc-devel] LoadLibrary fails if called from a DLL

2007-07-09 Thread Mark - WBIsoft.COM
Hi Yury,

have now recompiled the DLL with the latest SVN build using the 2_2 fixes but 
get the same problem, load library returns the same hex value 0x7c37000 - the 
actual procedure I have in the DLL is as follows

//  cut code here

function GetModuleHandle(lpModuleName: PCHAR): cardinal; stdcall; external 
'kernel32.dll' name 'GetModuleHandleA';
function LoadLibrary(lpLibFileName: PCHAR): cardinal; stdcall; external 
'kernel32.dll' name 'LoadLibraryA';
function GetProcAddress(hModule: HMODULE; lpProcName: LPCSTR): FARPROC; 
stdcall; external 'kernel32.dll' name 'GetProcAddress';

procedure debug(fn, tx : string);
var f : textfile;
begin
   assignfile(f,'c:\skelgina.log');
   if fileexists('c:\skelgina.log') then
  append(f)
   else
  rewrite(f);
   writeln (f,timetostr(now) + '  -  ' + fn + ': ' + tx);
   writeln (f);
   closefile(f);
end;

procedure GetProcedureAddress(var P: Pointer; const ModuleName, ProcName: 
string); stdcall;
var
  ModuleHandle: cardinal;
begin
  debug('GetProcedureAddress','Called');
  debug('GetProcedureAddress','ModuleName: '+modulename);
  debug('GetProcedureAddress','ProcName: '+procname);

  
  if not Assigned(P) then
  begin
debug('GetProcedureAddress','P is not assigned');
begin
  ModuleHandle := SafeLoadLibrary('MSGINA.DLL');
  debug('GetProcedureAddress','LoadLibrary MSGINA.DLL returns 
$'+inttohex(ModuleHandle,16));
end;
P := Pointer(GetProcAddress(ModuleHandle, PChar(ProcName)));

  end
  else
 debug('GetProcedureAddress','P is already assigned');
  
  debug('GetProcedureAddress','Exits - P assigned '+booltostr(assigned(p)));
end;

//  end code here

Any thoughts on this ?  I pulled the GetProcedureAddress function from the 
Jwa??? components to test incase it was my implementation of the LoadLIbrary 
code in FPC but obviously it's not !!!

Cheers

Mark


  - Original Message - 
  From: Yury Sidorov 
  To: FPC developers' list 
  Sent: Sunday, July 08, 2007 6:24 PM
  Subject: Re: [fpc-devel] LoadLibrary fails if called from a DLL


  Go to sources folder and execute:

  make distclean
  make all
  make install SNAPSHOT=1 INSTALL_PREFIX=C:/some_folder

  Yury.


  - Original Message - 
  From: Mark - WBIsoft.COM 
  To: FPC developers' list 
  Sent: Sunday, July 08, 2007 8:15 PM
  Subject: Re: [fpc-devel] LoadLibrary fails if called from a DLL


  THanks, one final (i hope) question 

  I assume I need to grab the entire folder and recompile it - if so I assume I 
can compile with FPC itself 

  Mark

- Original Message - 
From: Yury Sidorov 
To: FPC developers' list 
Sent: Sunday, July 08, 2007 6:12 PM
Subject: Re: [fpc-devel] LoadLibrary fails if called from a DLL


Get sources from svn using this path:
http://svn.freepascal.org/svn/fpc/branches/fixes_2_2

I dont know where snapshots can be found.

Yury.

- Original Message - 
From: Mark - WBIsoft.COM 
To: FPC developers' list 
Sent: Sunday, July 08, 2007 8:06 PM
Subject: Re: [fpc-devel] LoadLibrary fails if called from a DLL


Thanks,

can you suggest the best way (ie. the correct url) for me to run with the 
svn.exe command to get the latest snapshot as I'm unsure where the x86_64 stuff 
is - esp as it would appear to have vanished from the sourceforge page ?

What's the current x86_64 snapshot version ?

Thanks

Mark

  - Original Message - 
  From: Yury Sidorov 
  To: FPC developers' list 
  Sent: Sunday, July 08, 2007 6:05 PM
  Subject: Re: [fpc-devel] LoadLibrary fails if called from a DLL


  Hi,

  I fixed DLL related a few weeks ago. You need to get more fresh snapshot 
and test it.

  Yury.

  - Original Message - 
  From: Mark - WBIsoft.COM 
  To: FPC developers' list 
  Sent: Sunday, July 08, 2007 7:59 PM
  Subject: Re: [fpc-devel] LoadLibrary fails if called from a DLL


  Hi Yury,

  specifically the file was lazarus-0.9.23-fpc-2.1.5-20070531-win64.exe 

  Hope this helps ?

  Mark

- Original Message - 
From: Yury Sidorov 
To: FPC developers' list 
Sent: Sunday, July 08, 2007 5:28 PM
Subject: Re: [fpc-devel] LoadLibrary fails if called from a DLL


Hello,

How old is snapshot you are using?

Yury Sidorov.

- Original Message - 
From: Mark - WBIsoft.COM 
To: fpc-devel@lists.freepascal.org 
Sent: Saturday, July 07, 2007 11:51 AM
Subject: [fpc-devel] LoadLibrary fails if called from a DLL


Hi,  

I'm having a strange issue with the LoadLibrary call in the 64bit beta 
version of the free pascal compiler (fpc 2.1.5 with lazarus 0.9.23 beta) - 
standard install from the sourceforge download and installed in the default 
c:\lazarus directory.

I have written a function in FPC that I have used in Delphi for many 

Re: [fpc-devel] LoadLibrary fails if called from a DLL

2007-07-09 Thread Yury Sidorov

Hi,

Please create bug report on FPC site and attach source code of main 
program and dll and describe where the problem occurs.


Yury.

- Original Message - 
From: Mark - WBIsoft.COM

To: FPC developers' list
Sent: Sunday, July 08, 2007 10:13 PM
Subject: Re: [fpc-devel] LoadLibrary fails if called from a DLL


Hi Yury,

have now recompiled the DLL with the latest SVN build using the 2_2 
fixes but get the same problem, load library returns the same hex 
value 0x7c37000 - the actual procedure I have in the DLL is as follows

___
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel


[fpc-devel] [Fwd: StrictDelimiter]

2007-07-09 Thread Katona <[EMAIL PROTECTED]>
>From my cousin (Martin Pekar) regarding the strictdelimiter stuff.

Note that he did it blindly by reading delphi docs, he doesn't have
delphi anymore, so anyone with D2007 should check before applying.

Ales
--- Begin Message ---
 

srictdelimiter.patch
Description: Binary data
--- End Message ---
___
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel


Re: [fpc-devel] [Fwd: StrictDelimiter]

2007-07-09 Thread Michael Van Canneyt


On Mon, 9 Jul 2007, Ales( Katona wrote:

> >From my cousin (Martin Pekar) regarding the strictdelimiter stuff.
>
> Note that he did it blindly by reading delphi docs, he doesn't have
> delphi anymore,

Then where did he get the docs from ? =-)

> so anyone with D2007 should check before applying.

I do not have D2007, so if someone could check this, I would
appreciate it; I'll then apply the patch.

Michael.
___
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel


Re: [fpc-devel] [Fwd: StrictDelimiter]

2007-07-09 Thread Katona <[EMAIL PROTECTED]>
Michael Van Canneyt  wrote / napísal(a):
> Then where did he get the docs from ? =-)
>
>   
http://209.85.135.104/search?q=cache:Ke-OqWsb0hoJ:delphi.newswhat.com/geoxml/forumhistorythread%3Fgroupname%3Dborland.public.delphi.language.delphi.general%26messageid%3D44bd1a63%40newsgroups.borland.com+strictdelimiter+delphi&hl=sk&ct=clnk&cd=3&gl=sk
Ales

___
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel


[fpc-devel] FileNameCaseSensitive on Win32

2007-07-09 Thread Bram Kuijvenhoven

Hi!

Why is FileNameCaseSensitive set to true on Windows? Windows interprets 
filenames in a case *in*sensitive manner, doesn't it?

The attached program dumps values of some of the OS dependent constants defined 
in the System unit.

Regards,

Bram
program showOSconsts;

begin

  WriteLn('FileNameCaseSensitive: ',FileNameCaseSensitive);
  WriteLn('CtrlZMarksEOF: ',CtrlZMarksEOF);
  WriteLn('Length(LineEnding):',Length(LineEnding));
  WriteLn('LFNSupport:',LFNSupport);
  WriteLn('DirectorySeparator:',DirectorySeparator);
  WriteLn('DriveSeparator:',DriveSeparator);
  WriteLn('PathSeparator: ',PathSeparator);
  WriteLn('maxExitCode:   ',maxExitCode);
  WriteLn('MaxPathLen:',MaxPathLen);

end.___
fpc-devel maillist  -  fpc-devel@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-devel