Jak zpaisac zawartosc memo1 do pliku z kodowaniem UTF8

Odpowiedz Nowy wątek
zapis zawartosci mem
2010-08-31 08:47
zapis zawartosci mem
0

Jak zapisac zawartosc memo1.text memo1.lines do pliku z kodowaniem UTF8?

memo1.Lines.SaveToFile('plik.txt');

W jaki sposob zawartosc memo dac do UTF8 przy zapisie pliku ?

Pozostało 580 znaków

2010-08-31 08:51
Moderator

Rejestracja: 11 lat temu

Ostatnio: 2 miesiące temu

Lokalizacja: Szczecin

0
var
  SL : TStringList;
begin
  SL := TStringList.Create;
  SL.Text := AnsiToUTF8(Memo1.Text);
  SL.SaveToFile('D:\test.txt');
  SL.Free;
end;

O to chodzi?


Pozostało 580 znaków

poszukiwacz przygod
2010-08-31 08:59
poszukiwacz przygod
0

prosciej odpowiedz:

memo1.Lines.Text:=UTF8Encode(memo1.Lines.Text);
i komenda zapisujaca
memo1.Lines.SaveToFile('plik.txt');

:-))

Pozostało 580 znaków

2010-08-31 11:32
Moderator

Rejestracja: 12 lat temu

Ostatnio: 24 minuty temu

Lokalizacja: Wrocław

0

@up:
Twój kod zamieni całość w memo na kodowanie UTF-8.
Autor chciał, aby tylko zapisany plik był w UTF-8;


Pozostało 580 znaków

rasert
2010-09-02 08:00
rasert
0

Wydaje się że Delphi 2010 wspiera unicode więc wszystkie zapisy są domyślnie unicode i typ string jest domyślnie typu UnicodeString więc chyba nie potrzeba niczego zmieniać w kodzie? Jeśli mamy źródła bibliotek innych firm to w większości wypadków wystarczy zrobić build i one zostaną dołączone jako unicode bez potrzeby dalszej w nie ingerencji.

Pozostało 580 znaków

Odpowiedz

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0