Dateien in Assembler öffnen

[fdsgbla]

Warum kommt bei folgender Prozedur:

Delphi-Quellcode:

procedure TMainForm.DeleteFile;
var
  filename : string;
begin
  filename := 'c:\file.txt';
asm
  mov ah, 3Ch
  lea dx, filename
  xor cx, cx
  int 21h
  xchg ax,bx
end;
end;

zu

Im Projekt blablabla.exe ist eine Exception der Klasse EAccessViolation mit der Meldung 'Access violation at address 0045338D in module 'blablabla.exe'. Read of address FFFFFFFF' aufgetreten.