Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi per dll datei anlegen. wie? (https://www.delphipraxis.net/70725-per-dll-datei-anlegen-wie.html)

mojo777 3. Jun 2006 15:11


per dll datei anlegen. wie?
 
hallo,
ich habe soeben versucht eine udf zu schreiben und musste feststellen, dass meine dll es nicht schafft eine datei auf der festplatte anzulegen.

hier der code:
Delphi-Quellcode:
unit Unit1;

interface
uses sysUtils;
function WRITEUSERLOG( text:PChar):Integer; cdecl; export;

implementation

function WRITEUSERLOG(  text:PChar):Integer;
var  tf: TextFile;
erg:Integer;
begin
  try
  erg:=0;
  AssignFile(tf, 'udf_user_log.txt');
  Append(tf);
  Write(tf, DateToStr(date())+' '+FormatDateTime('hh:mm:ss', Now)+' '+text+#13#10);
  CloseFile(tf);
  except on e:exception do begin
  erg:=e.HelpContext;
  end; end;
  result:=erg;
end;


end.
was kann ich dann da tun?
bitte helft!
ich bin bei diesem thema schon fast am verzweifeln. :-(

danke

arbu man 3. Jun 2006 15:17

Re: per dll datei anlegen. wie?
 
Was passier wenn du eine absolute Pfad angabe verwendst ? Vielleicht wird die Datei udf_user_log.txt nur in einen anderen Verzeichnis erstellt.

mojo777 3. Jun 2006 15:20

Re: per dll datei anlegen. wie?
 
olé!
danke für den tipp! :-)
das war es!

:mrgreen:


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:30 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz