Dateigröße ermitteln, wie geht Ihr vor?

[Fukiszo]

das war an mich gemeint wegen dem unicode.
nicht das ich diesen tipp weitergebe ohne das berücksichtigt zu haben.
ich habs jedenfalls so aufgenommen als hinweis für mich da ich oft pChar einsetz wo es anders lauten sollte.

Grüße

[LTE5]

Ist es nicht egal, ob PChar oder PWideChar oder sonst was?
Ich kenne das nur so, dass PChar über allem steht.

[himitsu]

Nein, ist nicht egal.

PChar/Char/String sind compilerabhängig, also können sich ändern.
Wenn es also nicht zusammenpasst, dann kann es schnell knallen.

z.B. bei diesem Code hier PWideChar verwendet und schon gibt es in Delphi 2-2007 und in FreePascal probleme, wenn String und GetFileAttributesEx dort plötzlich ANSI sind, im Gegensatz zu Delphi 2009+.

PChar ist ein Alias, der je nach Compiler z.B. auf PAnsiChar oder PWideChar verweist.

[LTE5]

Zitat:

z.B. bei diesem Code hier PWideChar verwendet und schon gibt es in Delphi 2-2007 und in FreePascal probleme

Ich bin einfach stillschweigend davon ausgegangen, dass keiner mehr diese Krankheiten vor D2009 benutzt

[Fukiszo]

ich finds spannend dazuzulernen, da in meinen erste source code post's noch vieles per pChar werkelte und ich daraufhin zu weiteren links zu diesem thema verwiesen haben, hab ich hier http://docwiki.embarcadero.com/RADSt..._in_RAD_Studio und hier http://docwiki.embarcadero.com/RADSt...icode_anpassen meine kleinen ratgeber in bezug auf unicode gefunden. kann auch abende füllen sich da durchzuarbeiten (noch ein link, noch mehr input ...) aber macht spass.

in diesem sinne,

grüße

edit ps:
ich nutz delphi version 7 von anno dazumal und bin glücklich damit auch wenn ich kostenfrei ein aktuelles bekommen könnte.

[HolgerX]

Hmm..


Wieso dann nicht gleich Typfixiert?

Delphi-Quellcode:

function GetSize(const fileName: WideString): Int64;
var
   info: TWin32FileAttributeData;
begin
   if not GetFileAttributesExW(PWideChar(fileName), GetFileExInfoStandard, @info) then
     RaiseLastOSError;
   Result := Int64(info.nFileSizeLow) or Int64(info.nFileSizeHigh shl 32);
end;

Dies funktioniert unter allen Delphi-Versionen, welche WideChar unterstützen (somit eigentlich fast alle )

Edit:
Für alle API-Funktionen verwende ich nur noch die Wide Versionen. Somit gibt es auch keine Probleme..

[LTE5]

Gerade die Suche bemüht. Mach dir da keinen Kopf und benutz einfach PChar wenn du keine alten Delphiversionen <2009 mehr benutzt
http://www.delphipraxis.net/1385162-post6.html

[Fukiszo]

Jupp.

Zitat:

Delphi definiert bei WinAPIs auch in der Regel z.b. MessageBoxA , MessageBoxW und dann einmal noch nur MessageBox , welches dann auf eine der beiden Varianten verweist. Dadurch brauchst du dir über A/W keine Gedanken machen und einfach MessageBox(PChar(), ...) aufrufen. Willst du in irgendeinem Falle mal eine explizite Version, dann solltest du auch den Typen in die explizite Form casten: MessageBoxA(PAnsiChar(), ...) .

das bringt es auf den punkt

[Bernhard Geyer]

Zitat von LTE5:

Ich bin einfach stillschweigend davon ausgegangen, dass keiner mehr diese Krankheiten vor D2009 benutzt

+1

Aber ich glaube du wirst gleiche von bekannten Usern verbal gesteinigt ...

[LTE5]

Um meiner Steinigung zuvor zu kommen:
sollte dieser bekannte user Windows 10 nutzen, darf er mich schlicht weg nicht steinigen. Er darf es nur, wenn er noch Windows XP nutzt.