Forum: Object-Pascal / Delphi-Language
by Rolf Frei,
9. Dez 2019
@Bbommel
Danke für deine Bemühungen, aber das habe ich ja schon erwähnt, dass es mit einem TMemIniFile klappen würde. Das habe ich bereits in einem Post erwähnt und auch erklärt, wieso mir das nicht so recht gefällt. Dass da immer das ganze INI File geladen und geschrieben wird ist nicht ideal. Brauche es aber nun dennoch, weil so das Problem vorerst behoben ist.
@TiGü
Natürlich könnte ich...
Forum: Object-Pascal / Delphi-Language
by Rolf Frei,
9. Dez 2019
Schau dir bitte nochmals die letzte Nachricht an. Habe da noch Ergänzungen mit einem Beispiel gemacht.
Das sind nur Daten die so in einem INI File abgelegt sind und die ich beim Einlesen/Schreiben Ent/Verschlüssle. Als Resultat bekomme ich dann ganz normalen Text und nichts Binäres.
Und ja das würde ich heute nicht mehr so machen, aber das ist vor 20 Jahren so entstanden und hat nun gute 20...
Forum: Object-Pascal / Delphi-Language
by Rolf Frei,
8. Dez 2019
@Dennis07
Herzlichen Dank für deine Erklärung. Dann gibt es also keine Möglichkeit das ohne "Aufwand" zu lösen. Meine for-Schlauefe würde dann ja auch das mache was ich will und wäre viel einfacher, als dein Code. Vermutlich aber auch etwas langsamer. Das wäre hier aber keine Problem, da diese Routine nur sehr vereinzelt aufgerufen wird.
Ich mache nun sowas in der Art:
var
a:...
Forum: Object-Pascal / Delphi-Language
by Rolf Frei,
7. Dez 2019
Das ist mir alles bekannt nützt mir hier nur nichts oder ich verstehe nicht wie man das richtig anwendet. Man müsste ja beim Unicodestring "s" sagen, dass er nichts umwandeln soll. Hast du mir eventuell ien Beispal anhandn meins Beispiels? Bei meinen Tests kam da nie das gewünschte heraus, wenn ich mit Tencoder herumgespielt habe.
Wenn ich "a" and "s" nicht direkt zuweise, sondern sowas hier...
Forum: Object-Pascal / Delphi-Language
by Rolf Frei,
7. Dez 2019
Wie kann ich in 10.3 Rio einen AnsiString einem String zuweisen, ohne dass der String über die Codepage konvertiert wird? Siehe folgendes Beispiel:
var
a: AnsiString;
s: String;
begin
a := #$33#$95#$34;
s := a;
end;