Problem mit TFileStream (und DeleteFile)

[Nightshade]

Zitat von Helmi:

Delphi-Quellcode:

procedure TForm1.ClientSocketRead(Sender: TObject;
  Socket: TCustomWinSocket);
{...}
begin

      if not Working then
        begin
          //Variable setzen
          Working := True;

Versuch doch mal mit

Delphi-Quellcode:

procedure TForm1.ClientSocketRead(Sender: TObject;
  Socket: TCustomWinSocket);
{...}
begin

      if not Working then
        begin
          //Variable setzen
          Working := True;
          ShowMessage(SaveFile); //<-  hier anzeigen lassen

Den Dateinamen anzeigen zu lassen...