CopyFileEx: dwCopyFlags werden nicht erkannt

[hans ditter]

Moin moin!

Ich hab mich mal nach diesem Thread an über CopyFileEx informiert und natürlich MSDN befragt.
CopyFileEx funktioniert soweit sehr gut. Ich würde nur gerne die dwCopyFlags (in der Tabelle bei MSDN nachlesbar) setzten und da hat mein Delphi (Turbo Delphi) ein Problem mit.

Einige dieser Konstanten kennt mein Delphi (z.B. COPY_FILE_FAIL_IF_EXISTS, COPY_FILE_RESTARTABLE), die meisten aber nicht (z.B. COPY_FILE_NO_BUFFERING, COPY_FILE_OPEN_SOURCE_FOR_WRITE,....).

Ich würd allerdings gerne den COPY_FILE_NO_BUFFERING-Flag setzten... aber wie gesagt, schmeißt mir Turbo Delphi dann einen Fehler entgegen, dass dieser Term unbekannt sei. Hier hab ich über Google ("delphi COPY_FILE_NO_BUFFERING konstante") die Unit sdaWindows.pas gefunden und versucht die in meine uses-Klausel einfach mal aufzunehmen... aber leider kennt Delphi auch diese Unit nicht.

Muss ich für die unbekannten Konstanten von CopyFileEx jetzt noch eine Unit runterladen oder die irgendwo selber definieren oder muss ich nur noch eine bestimmte Unit mit einbinden?

Vielen Dank und LG; hans ditter

[DeddyH]

Wenn Dein Delphi sie noch nicht kennt, musst Du sie selbst definieren, der Wert müsste ja im MSDN stehen.

[messie]

Zitat:

Zitat von DeddyH (Beitrag 1174528)

Wenn Dein Delphi sie noch nicht kennt, musst Du sie selbst definieren, der Wert müsste ja im MSDN stehen.

Oder den DWORD-Wert aus MSDN direkt übergeben. Wenn einige flags bekannt sind, dann kann die Funktion auch mehr.
Einige Flags werden scheinbar erst ab Vista unterstützt.

[DeddyH]

Magic Numbers? *Bäh*

[hans ditter]

Heißt das, ich müsste jetzt für COPY_FILE_NO_BUFFERING das so definieren:

Delphi-Quellcode:

const COPY_FILE_NO_BUFFERING = 0x00001000;

bzw. CopyFileEx gleich mit 0x00001000 aufrufen?

Nebenbei, OS ist schon Vista... ist nur mein Delphi was etwas in die Tage gekommen ist. ;)

[messie]

Zitat:

Zitat von DeddyH (Beitrag 1174530)

Magic Numbers? *Bäh*

Tschuldigung, habe gerade in C programmiert und vergessen, dass es Hochsprachen gibt :P

[DeddyH]

In C gibt es doch auch Konstanten, zumindest defines, oder habe ich das falsch in Erinnerung?
@hans:

Delphi-Quellcode:

const 
  COPY_FILE_NO_BUFFERING = $00001000;

[messie]

Zitat:

Zitat von DeddyH (Beitrag 1174534)

In C gibt es doch auch Konstanten, zumindest defines, oder habe ich das falsch in Erinnerung

Ja.
Aber wenn Du inmitten von großen Eimern voll * und -> sitzt, greifst Du manchmal gerne zu einer Zahl. Die ist etwas Begreifbares. :lol:

[hans ditter]

:shock: Jetzt geht's gar nicht mehr!!

Ich hab CopyFileEx jetzt mit $0000100 für die dwCopyFlags aufgerufen (ich weiß, hässlich Nummer, aber war erstmal einfacher einzupflegen) und jetzt kopiert der gar nichts mehr. Die Funktion gibt 0 zurück, also ist ein Fehler aufgetreten...

Wie kommt das denn jetzt zustande?

[DeddyH]

Die 1 steht an der falschen Stelle, nicht $00000100, sondern $00001000.

[himitsu]

Zitat:

Zitat von hans ditter (Beitrag 1174537)

Wie kommt das denn jetzt zustande?

CopyFileEx / GetLastError / SysErrorMessage / RaiseLastWin32Error RaiseLastOSError

[hans ditter]

@DeddyH
Danke für den Hinweis. Da könnt mir wirklich eine 0 abhanden gekommen sein... ;)

@himitsu
Werd's nächstes mal erst verwenden und dann fragen. Gut das du die entsprechenden Funktionen nochmal aufgschrieben hast... ich vergiss die immer wieder! ;)

[himitsu]

Manchmal sind die halt doch etwas hilfreich.
Ich vermute jetzt einfach mal, daß es dir eventuell was vonwegen "invalid parameter" gesagt hätte.


Hast du eigentlich die JCL installiert?
Dort findet man für Vieles schon fertig übersetzte Header, bzw. ganze Wrapperklassen.

[hans ditter]

Ich werd's morgen mal ausprobieren. Danke nochmal. :)

Ich muss jetzt mal ganz blöd fragen: Was ist die JCL? Und muss man die manuell nachinstallieren oder ist die gleich mitgeliefert? Ich hab nämlich grade keine Ahnung, was das sein soll... werd das morgen mal googlen! :D

Gute Nacht; hans ditter

[himitsu]

JCL - Jedi Code Library (nicht visuelle Komponenten und sonstige Codes ... z.B. API-Header und sowas wie eine TStringList)
JVCL - Jedi Visual Code Library (visuelle Komponenten ... quasi sowas wie ein TMemo)

Das ist eine "kostenlose" Komponentensammlung, welche man allerdings selber installieren muß.

Delphi Jedi

Tschuldschung, ich war davon ausgegangen, daß wir auch für JCL und JVCL passende Akronyme hätten und nicht nur für Jedi (halte hier mal die Maus drüber).