AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Unicode und Filestream

Ein Thema von hanspeter · begonnen am 1. Jul 2011 · letzter Beitrag vom 2. Jul 2011
Antwort Antwort
Keldorn

Registriert seit: 6. Mär 2003
Ort: Meißen
876 Beiträge
 
Delphi 10.1 Berlin Professional
 
#1

AW: Unicode und Filestream

  Alt 1. Jul 2011, 17:49
Hallo

was ist, wenn man in einem D2007-Projekt einen String nicht über writebuffer, sondern über die Treader und Twriterklasse und Readstring und writestring in den Stream klopft?

Die funktionen, die dort genutzt werden, speichern den String ja auch anders (als UTF8?)ab. Muß ich hier Probleme befürchten oder kann ich mich bei einem Wechsel auf Delphi-XE darauf verlassen, das ich keine Probleme bekomme und alles wieder so geöffnet wird, wie es gespeichert wurde? Und ich keine Änderungen vornehmen muß, wenn meine strings in Klassen alle nur als xyz:string; definiert sind?

Gruß Frank

Lükes Grundlage der Programmierung:
Es wird nicht funktionieren
(Murphy)
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
10.048 Beiträge
 
Delphi 12 Athens
 
#2

AW: Unicode und Filestream

  Alt 1. Jul 2011, 18:05
Ich benutze schon länger diese beiden Methoden. Die sollten immer funktionieren, egal mit welcher Version gespeichert und mit welcher geladen wird:
Delphi-Quellcode:
// Read an UTF8 encoded string from a stream
function LoadStringFromStream(AStream: TStream): String;
var
  ResultString: AnsiString;
  StringSize: Integer;
begin
  Result := '';
  if AStream.Size - AStream.Position < SizeOf(StringSize) then
    Exit;
  AStream.ReadBuffer(StringSize, SizeOf(StringSize));
  SetLength(ResultString, StringSize);
  if AStream.Size - AStream.Position < StringSize then
    Exit;
  AStream.ReadBuffer(Pointer(ResultString)^, StringSize);
  {$ifdef UNICODE} // ab Delphi 2009
  Result := Utf8ToString(ResultString);
  {$else}
  Result := Utf8Decode(ResultString);
  {$endif}
end;

// Write a string to a stream and encode it to UTF8 before
procedure SaveStringToStream(AStream: TStream; AString: String);
var
  StringSize: Integer;
  StringToSave: AnsiString;
begin
  StringToSave := Utf8Encode(AString);
  StringSize := Length(StringToSave);
  AStream.WriteBuffer(StringSize, SizeOf(StringSize));
  AStream.WriteBuffer(Pointer(StringToSave)^, StringSize);
end;
Sebastian Jänicke
AppCentral
  Mit Zitat antworten Zitat
Keldorn

Registriert seit: 6. Mär 2003
Ort: Meißen
876 Beiträge
 
Delphi 10.1 Berlin Professional
 
#3

AW: Unicode und Filestream

  Alt 2. Jul 2011, 07:30
Hallo

TEeder.readstring + TWriter.writestring gehen ja ähnlich vor. aber wie sehen die beiden Procs in Delphi-XE aus? ? kann man davon ausgehen, daß der Umstieg kein Problem wird?

Frage ist natürlich auch, warum sehr selten sieht, das Treader und Twriter verwendet wird.
ich persönlich finde es übersichtlicher, da man hier für die einfachen Datentypen die entsprechenden Funktionen hat.

Gruß Frank

Lükes Grundlage der Programmierung:
Es wird nicht funktionieren
(Murphy)
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.524 Beiträge
 
Delphi 12 Athens
 
#4

AW: Unicode und Filestream

  Alt 2. Jul 2011, 07:43
TReader und TWriter haben schon seit Jeher mehrere Methoden für AnsiString und WideString/UicodeString und sollten daher auch überall funktionieren ... denk ich mal

PS: Binär-DFMs werden darüber gespeichert und die können von D2009+ und auch von NichtUnicode-Delphis gelesen/erstellt werden.
Ein Therapeut entspricht 1024 Gigapeut.

Geändert von himitsu ( 2. Jul 2011 um 08:02 Uhr)
  Mit Zitat antworten Zitat
Keldorn

Registriert seit: 6. Mär 2003
Ort: Meißen
876 Beiträge
 
Delphi 10.1 Berlin Professional
 
#5

AW: Unicode und Filestream

  Alt 2. Jul 2011, 07:51
ok, danke

Lükes Grundlage der Programmierung:
Es wird nicht funktionieren
(Murphy)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:30 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz