TMemoryStream okuma sorunu. Kareler Çıkıyor.

[neu84]

Selam arkadaşlar, TMemoryStream i kullanmayı ögrenebilmek için nişiler yapmaya çalıştım en başında takıldım, aşağıdaki kod bi text dosyasından Merhaba diye bi yazıyı okuması lazım. Okuyor ancak karelerden oluşan bir çıktı gösteriyor. Dönüştüremedim bi türlü. Önerileriniz için şimdiden tşk.

Kod: Tümünü seç

var
M:TMemoryStream;
sonuc:Ansistring;
buffer:Pchar;
begin
M:= TMemoryStream.Create;
M.LoadFromFile('C:\streamoku.txt');
Buffer := AllocMem(m.Size);
M.Read(buffer^,m.Size);
Memo1.Text:= buffer;
end;

[neu84]

arkadaşlar txt dosyamın formatını Unicode olarak degiştirdim gösterdi ama bu seferde Merhaba nın önünde bi tane kare var. Txt Merhabadan önce hiç bişi yok..?

[sadettinpolat]

dosya unicode ise dosyanin en basinda okudugun karakter BOM (BYTE ORDER MARK) ' dur.

http://edn.embarcadero.com/article/38693
http://edn.embarcadero.com/article/imag ... nicode.pdf

[neu84]

dosya unicode ise dosyanin en basinda okudugun karakter BOM (BYTE ORDER MARK) ' dur.

http://edn.embarcadero.com/article/38693
http://edn.embarcadero.com/article/imag ... nicode.pdf

Çok teşekkür ederim cevap için.. Peki bana Memorystream ile veriyi sorunsuz okuyabilmem için unicode dışında kullanabilecegim başka bir çözüm önerebilirmisiniz varsa eger..

[sadettinpolat]

Memorystream file read delphi anahtar kelimeleri ile google aratirsan cikar buyuk ihtimal ornek kodlar...

[neu84]

Memorystream file read delphi anahtar kelimeleri ile google aratirsan cikar buyuk ihtimal ornek kodlar...

Peki sagolun.

[ikra]

diyezon.com adresinde, stream kullanimi üzerine makale var.
faydasi olur.

[neu84]

diyezon.com adresinde, stream kullanimi üzerine makale var.
faydasi olur.

sagolasın kardeş.