Konvertering

OemToAnsi / AnsiToOem

/Martin

eller brug en Memo og sæt OEMConvert inden du læser den ind.

>martinlind

Kan du ikke udybe dit svar lidt, for der står ikke noget om OemToAnsi i hjælpen.
Hvis en kunne vise mig en kode der virker, f.eks ala sådan her

var
indfile :textfile;
s,tmp:string;
begin
  While (Not Eof(IndFile)) Do
  Begin
    ReadLn(IndFile,s);
    tmp := AnsiToOem(s,xxxx - eller hvad der nu skal stå);
  End;