Zitat von
mkinzler:
Du kannst einer Stringvariablen problemlos einen AnsiString zuweisen. Umgekehrt kann es natürlich Probleme geben
nö - geht in der Form leider nicht. Da kommt nur MMüll bei rum, weil der Inhalt des Ansistrings ein verschlüsseter Text ist!
auch mit move geht es nicht - kracht mit einer
Access Violation weg.
Delphi-Quellcode:
if odlg.Execute then begin
fs := TFileStream.Create(odlg.FileName, fmOpenRead or fmShareDenyWrite);
fs.Position := 0; // File in den String-Stream schreiben
sstream := TStringStream.Create;
sStream.CopyFrom(fs,fs.size);
ansitmp := sStream.DataString;
move(ansitmp,stmp,length(ansitmp));
memo1.text := stmp;
freeandnil(sstream);
freeandnil(fs);
end;
wie bringe ich das in eine lauffähige Version?
Gruss
EL