Delphi-PRAXiS
Seite 5 von 5   « Erste     345   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   GetFileSize - welches ist die bessere Funktion? (https://www.delphipraxis.net/194137-getfilesize-welches-ist-die-bessere-funktion.html)

himitsu 4. Apr 2024 09:50

AW: GetFileSize - welches ist die bessere Funktion?
 
Zitat:

Zitat von Benmik (Beitrag 1535278)
Leider kann ich keine der C-Sprachen. Dort ist die Code-Situation viel günstiger

Was "nativ" in C/C++ geht, geht auch im Delphi, also wenn es direkt um die WinAPI geht, ohne Wrapper ala RTL, VCL oder von Fremden drumrum.
Wir nutzen die selbe WinAPI, also lässt sich nahezu alles ins Pascal/Delphi übersetzen, bzw. wir können in C-Codes abgucken.

Unterschied ist nur, dass in Delphi nicht alles "deklariert" ist (Borland/Emba war/ist zu faul dafür), da wir es in unserer Syntax (Delphi-Language) benötigen und wir nicht einfach so C-Header-Files importieren können.
OK, stimmt nicht ganz, denn WinMD stellt es uns automatisch übersetzbar zur Verfügung, wenn es denn irgendwann mal funktioniert. https://www.delphipraxis.net/214473-...vor-winmd.html
Wobei C-Compiler oft einfach direkt die Header-Files nutzen können, welche Microsoft für Windows bereit stellt (MSDN bzw. PSDK/WinSDK).

Leider geht es bei "Delphi" nur andersrum ... es lassen sich Delphi-Units im C++Builder nutzen,
aber leider keine Dateien/DCU vom C++Builder im Delphi (inkl. fremder HeaderFiles und Codes) ... also das wäre echt mal ein sinnfolles Feature. :cry:

Benmik 4. Apr 2024 11:55

AW: GetFileSize - welches ist die bessere Funktion?
 
Zitat:

Zitat von jbg (Beitrag 1535282)
Im Code von CreateFileW wird vor dem Aufruf von NtCreateFile der "Access" Parameter mit 0x00100080 ge-OR-t. Das wäre also NtCreateFile(Access or (SYNCHRONIZE or FILE_READ_ATTRIBUTES), ...).
...
0 hat also die gleiche Bedeutung wie "SYNCHRONIZE or FILE_READ_ATTRIBUTES".

Das war jetzt erstmal eine Kopfnuss, diese Bitmasken zu sortieren und gedanklich für OR übereinander zu stellen. Aber tatsächlich geht CreateFile mit 0 oder FILE_READ_ATTRIBUTES durch, auch wenn die Datei durch eine vorherige Öffnung mit
Delphi-Quellcode:
GENERIC_READ or GENERIC_WRITE, 0,
komplett blockiert ist. Im Gegenzug kann man den Parameter dwShareMode auf 0 setzen, da er bei FILE_READ_ATTRIBUTES ignoriert wird, also
Delphi-Quellcode:
hFind := CreateFile(PChar(Dateiname), FILE_READ_ATTRIBUTES, 0, nil,OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);


Mir erscheint dann ein
Delphi-Quellcode:
FILE_READ_ATTRIBUTES
anschaulicher, da hast du recht.

Mir fällt übrigens noch ein, dass ich einen Leer-Aufruf von GetFileInformationByHandle auch nach CreateHardLinkW benutze, da laut Doku dann die Dateiinformationen aktualisiert werden.


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:53 Uhr.
Seite 5 von 5   « Erste     345   

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