Forum: Object-Pascal / Delphi-Language
Delphi
by jnaumann50,
2. Dez 2011
3000-mal sorry für mein Unverständnis
Ich hoffe Du hilfst mir freundlicherweise weiter
procedure CopyFile(const FileName, DestName: TFileName);
var
CopyBuffer: Pointer; { buffer for copying }
TimeStamp, BytesCopied: Longint;
Source, Dest: Integer; { handles }
Destination: TFileName; { holder for expanded destination name }
const
Forum: Object-Pascal / Delphi-Language
Delphi
by jnaumann50,
2. Dez 2011
Danke Sir Rufo
Hie die lesbarere Version
procedure CopyFile(const FileName, DestName: TFileName);
var
CopyBuffer: Pointer; { buffer for copying }
TimeStamp, BytesCopied: Longint;
Source, Dest: Integer; { handles }
Forum: Object-Pascal / Delphi-Language
Delphi
by jnaumann50,
2. Dez 2011
Bitte kannst Du mir mal ein Beispiel geben - Leider habe ich keine Auhneung was Du meinst
Sorry
Jürgen
Forum: Object-Pascal / Delphi-Language
Delphi
by jnaumann50,
2. Dez 2011
Hier der Quelltextauszug klarer;
procedure CopyFile(const FileName, DestName: TFileName);
var
CopyBuffer: Pointer; { buffer for copying }
TimeStamp, BytesCopied: Longint;
Source, Dest: Integer; { handles }
Destination: TFileName; { holder for expanded destination name }
const
ChunkSize: Longint = 8192; { copy in 8K chunks }
Forum: Object-Pascal / Delphi-Language
Delphi
by jnaumann50,
2. Dez 2011
Hallo,
ich erhalte bei einem alten Proket (Delphi3) welches ich nach Delphi2009 umsetzen muss seltsame Comiler-Fehler sieh Quelltextausschnitt
type
Ptr_CPC_MSG = ^CPC_MSG;
var
MainForm : TMAINForm;
professional : byte; // Code für Freischaltung/Berechtigung (1-4)
projektOffen : Boolean; // true, falls gerade ein Projekt geöffnet ist