try except bei TFileStream im Thread

**himitsu**

Man könnte auch den Exception-Text einfach nur erweitern und dann weiterreichen, anstatt gleich die ganze Exception abzufangen.

zusammenfalten · markieren

Delphi-Quellcode:

			try

  FileStream := TFileStream.Create(Path + Filename, fmCreate);

  try

    FileStream.Write(MyString[1], Length(MyString) * SizeOf(Char));

  finally

    FileStream.Free;

  end;

except

  on E: Exception do

    E.Message := 'FileStream Exception: ' + E.Message;

  raise;

end;

Zitat:

MessageBox(PWideChar(...

PWideChar und PChar gemischt?
Schön daß man Unicodefehler auf auf einem Unicode machen kann ... wehe es beschwert sich dann einer, daß es in ANSI nicht läuft

Application.MessageBox ist auf PChar definiert, also sollte man dan nicht einfach wo PWideChar verwenden.

try except bei TFileStream im Thread

AW: try except bei TFileStream im Thread

Forumregeln