Forum: Object-Pascal / Delphi-Language
by jaenicke,
11. Jul 2011
Nein, einfacher. :mrgreen:type
TDemo = record
LogoA: array of WideString;
LogoB: array of WideString;
...
end;
MyData.LogoA := (FindComponent('cmb_ro_team_a' + IntToStr(i)) as TComboBox).Text;
MyData.LogoB := (FindComponent('cmb_ro_team_b' + IntToStr(i)) as TComboBox).Text;
Wobei du solche konstanten Namen wie cmb_ro_team_a am besten als Konstanten deklarierst, dann...
Forum: Object-Pascal / Delphi-Language
by jaenicke,
11. Jul 2011
Noch herrlicher aber ohne...
Denn der Compiler kann dir dort bei Tippfehlern nicht helfen, so dass sich da leicht versteckte Probleme einschleichen können. Qualitativ guter Quelltext sieht anders aus...
Ein Beispiel nach deinem Quelltext:type
TGraphicContents = record
Header: WideString;
SubLine: WideString;
TeamA: WideString;
TeamA: WideString;
Footer1: WideString;
Forum: Object-Pascal / Delphi-Language
by jaenicke,
11. Jul 2011
Funktioniert es denn, wenn du den Inhalt der Editfelder direkt per MessageBoxW ausgibst?
(Gibt es vielleicht noch eine andere Eigenschaft als Text? Also ist Text wirklich WideString?)
Lass doch den Unsinn mit der TWideStringList weg. Wenn du mehrere Werte nicht einzeln übergeben willst, nimm einen Record. Aber das ganze zu einer Liste verwursten und dann wieder auseinanderzubasteln ist...
Forum: Object-Pascal / Delphi-Language
by jaenicke,
9. Jul 2011
Nicht nur deshalb. Dadurch wird sichergestellt, dass ein neuer WideString als direkte WideString Variable an den OleVariant Wert übergeben wird.
Eigentlich sollte das keinen Unterschied machen. Aber man weiß ja nie...
Forum: Object-Pascal / Delphi-Language
by jaenicke,
8. Jul 2011
Hmm, testweise könntest du TextString.Values] usw. einmal in WideString Variablen zwischenspeichern bevor du es übergibst.
Forum: Object-Pascal / Delphi-Language
by jaenicke,
7. Jul 2011
Für den Zweck würde sich zwar eine neuere Delphiversion (2009+) als die bei dir angegebene Version Delphi 7 wegen voller Unicodeunterstützung besser eignen, aber nichtsdestotrotz sollten WideStrings auch in Delphi 7 bereits funktionieren, da sie vom Betriebssystem verwaltet werden.
WideStrings sind auch nicht UTF-8, sondern benutzen tatsächlich die 2 Byte pro Zeichen.
Kannst du vielleicht...