sorry hab es noch mal geprüft
es kommt nicht alles an
die Daten werden aus einer ini datei ausgelesen
mit dieser Function
Code:
//Aus Ini Daten lesen
Function Ini_Lesen_IU(datei_s : String; section_s : String; key_s : String) : String;
var
Ini : TIniFile;
begin
Ini :=TIniFile.Create(datei_s);
try
Result := Ini.ReadString(section_s, key_s, '');
finally
Ini.free;
end;
end;
und hier fehlt dann die hälfte
Er überträgt 2047 Zeichen