![]() |
Re: Verschiedene Befehle
Du kannst dir deine kopier-Funktion aber auch selber basteln:
Delphi-Quellcode:
function copyafile(fromfile,tofile:string):boolean;
var f,t:file of byte; tocopy,copied:integer; buf:array[1..4096] of byte; begin result:=false; try begin assignfile(f,fromfile); assignfile(t,tofile); reset(f); rewrite(t); while not eof(f) do begin blockread(f,buf,length(buf),tocopy); blockread(f,buf,tocopy,copied); if ((copied<>tocopy) or (tocopy=0)) then raise exception.create('Datei konnte nicht vollständig kopiert werden.'); end; closefile(f); closefile(t); result:=true; end except end; end; |
Re: Verschiedene Befehle
Zitat:
Außerdem hat er dann ja nicht die Funktion selbst gebastelt, sondern von irgendwo anders abgeschrieben wie du auch gerade. :roll: |
Re: Verschiedene Befehle
Zitat:
Grüße Faux |
Re: Verschiedene Befehle
Und wie kann ich z.B. die Datei Test.exe öffnen/ausführen
|
Re: Verschiedene Befehle
Zitat:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:41 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz