Zitat von
HPW:
Ich lese aus einer Datei dies ein:
Aspect_Ratio : array[0..3] of byte;
und möchte die 4 Byte in diese Variable zuweisen:
arfactor : Double;
Delphi-Quellcode:
var
tmpstr: string;
begin
// angenommen Aspect_Ratio enthält einen String (z.B. '2.50')
SetString(tmpstr, PChar(Aspect_Ratio), sizeof(Aspect_Ratio));
tmpstr := StringReplace(tmpstr, '.', Decimalseparator, []);
arfactor := StrToFloat(tmpstr);