StreamtoStrings

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
kemal
Üye
Mesajlar: 10
Kayıt: 12 Haz 2004 11:38

StreamtoStrings

Mesaj gönderen kemal »

Sorunum kısaca şu:

Bir field'ı ayar dosyası gibi kullanıcağım.
Blob(Text) olarak tanımlanmış bir fielddan aldığım bilgileri bir TMemoryStream'a aktaracağım ve bu TMemoryStream'dan ayarlarımı yükleyecek veya kaydedeceğim. E basit yöntemle bunu direk olarak SaveToFile ile bir dosya halinde kaydedebiliyoruz fakat bu dosyanın dışarıdan okummaması gerekli ve değiştirilememesi. Bundan dolayıdır ki TMemoryStreamkullanmak sorunda kaldım. Buna benzer bir soruyu daha önceden de sormuştum fakat denedim istediğim olmadı.

Kendim bir yola başvurmak zorunda kaldım. çok uzun ve gereksiz. Şöyle :

İlk önce Blobdan aldığım stream'ı bir TMemoryStream'a aktarıyorum.
sonra
Memo1.Lines.LoadFromStream(); gibi bir komutla stream 'dan strings'e
daha sonra
myini.SetStrings(Memo1.Lines); ile ini'ye aktarıyorum. gördüğünüz gibi çok saçma :)


Bunun elbetteki bir kısa yolu olmalı herhande. :D

Neyse en azından okuduğunuz için teşekkürler.

Herkese iyi Çalışmalar.

Kemal Gök.
Kullanıcı avatarı
freeman35
Admin
Mesajlar: 2380
Kayıt: 12 Haz 2003 04:05
Konum: merkez camii yanı

Mesaj gönderen freeman35 »

sadece son aşama yani ini ye yazmana gerek yok
TSring in Values unu kullanabilirsin

Kod: Tümünü seç

var MyPath : string;
begin
     MyPath := Memo1.Lines.Values['MyPath'];
kolay gele
ZAGOR TENAY TÜRK'tür... TÜRK kalacak...
Zoru başarırım, İmkansız zaman alır
FreeMan 35.5

Soru sormaya üşenmiyorsan, sorunun çözümünü yazmaya da üşenme !!!
Cevapla