Forum: Win32/Win64 API (native code)
Delphi
by irata,
5. Okt 2006
Danke für den guten Tipp. Jetzt klappt es!
Obwohl es
Result := hFile <> INVALID_HANDLE_VALUE;
heissen müsste!
Und das mit dem Timer disablen könnte ich auch noch testen.
Danke an alle für die guten Tipps!!!
Forum: Win32/Win64 API (native code)
Delphi
by irata,
5. Okt 2006
Ähm... das hört sich gut an! Wie öffnet man eine Datei exclusiv? :?
Bin nicht so der Delphi Crack... Programmiere normal meist in Perl.
Forum: Win32/Win64 API (native code)
Delphi
by irata,
5. Okt 2006
Hallo,
hier die "Move" Routine:
function TFmMain.MoveFile(const AOldName, ANewName: string ): boolean;
var
sh: TSHFileOpStruct;
begin
try
FillChar(sh, sizeOf(TSHFileOpStruct), 0);
sh.Wnd := Application.Handle;