Olevariant tipinden bilgi almak...

[tolgaozb]

Selamlar
TCP/IP üzerinden gelen bir bilgiyi (kart okuyucudan) alıp değerlendirmem gerekiyor.
Okuyucu componentinin onreceive olayı şu şekilde :

rdOkuyucu1Receive(Sender: TObject; var data: OleVariant)

Buradaki data değişkeni görüldüğü gibi OleVariant tipinde.Buradan gelen bilgiyi ne şekilde bir string ifadeye dönüştürebilirim ?
netten bulduğum önce memorystringe dönüştürmek sonra da memorystringi stringe dönüştürmek.Buna yarayan fonksiyonalar var.Sistem 7/24 çalışan bir yapı ilk aşamada bu şekilde çalışsa da
bir süre sonra memory ya da yerini tespit edemediğim bir kodda program çakılıyor.
OleVariant nedir ve içindeki bilgiyi en sağlıklı nasıl alırım konusunda kısaca da olsa bilgi alabilirsem memnun olurum...

Teşekkürler

[SimaWB]

Kod: Tümünü seç

if not VarIsNull(data) then 
  s := VarToStr(data);

[tolgaozb]

Malesef...
kod "invalid variant type conversion " hatası veriyor..

[SimaWB]

siz "nasıl string ifadeye dönüştürebilirim" diye sorduğunuz için bu kodu yazmıştım. Demek ki parametreyle gelen değer string uyumlu değil. Cihazın kullandığı protokol ile ilgili bilgiye ihtiyacınız var. Zaten olevariant kullanmanın temelinde; gönderen ve alan tarafların mesajlaşmada kullanılan veri yapısını biliyor olması yatar.