Hallo,
bei folgender Prozedure tritt ein Problem auf:
Delphi-Quellcode:
procedure move_file;
begin
//Datei verschieben
if fileexists(dir2) then
Begin
if MessageDlg('Datei ''' + dir2 + ''' schon vorhanden! Überschreiben?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then
begin
deletefile(dir2);
MoveFile(PChar(dir), PChar(dir2));
end;
end
else
begin
movefile(PChar(dir), PChar(dir2));
//Datei verschoben Kennzeichen auf True setzen
DatMove := True;
end;
end;
Er verschiebt die Fehlerunterstriche (wenn man sich z.b. bei movefile(xxx) verschrieben hat) nach oben, desweitern sind die debugger punkte links nicht mehr richtig, d.h. irgendwo wo auch leerzeilen etc sind.
Hat einer eine idee warum das so ist? Danke schonmal.
Gruß Asfaloth
PS: verwende Delphi2005