09-08-2017, Saat: 11:54
+4 puan değerinde küçük bir soru yöneltiyorum arkadaşlarıma. Doğru cevap veren tüm arkadaşlara +4 puan vereceğim.(Daha fazla puan verilemediği için)
Elimizde bulunan Variant tipli bir değişkenin TBytes'a dönüştürülmesi istenen. Örneğin;
Kolay gelsin
Not: Unutulmaması gereken şey, Variant tipli değişkenimize her türden veri türünü atayabileceğimiz. Bu durumda elde edilmesi gereken byte dizisinin uzunluğunun atanan veri türünün size'ı ile eşit olması gerektiğidir. Örneğin 4 Byte'lık Integer veri türü için Byte array'de 4 adet eleman olmalıdır, Word türlü bir değişken için Byte array'de 2 eleman olmalıdır. "HELLO WORLD" string'i için Byte array'de 11 eleman olmalıdır gibi.
Elimizde bulunan Variant tipli bir değişkenin TBytes'a dönüştürülmesi istenen. Örneğin;
var V : Variant; I : Integer; begin I := 1453; V := I; // Elde edilecek byte dizisi [5, 173, 0, 0] end; var V : Variant; S : AnsiString; begin S := 'DELPHI'; V := S; // Elde edilecek byte dizisi [68, 69, 76, 80, 72, 73] end;
Kolay gelsin
Not: Unutulmaması gereken şey, Variant tipli değişkenimize her türden veri türünü atayabileceğimiz. Bu durumda elde edilmesi gereken byte dizisinin uzunluğunun atanan veri türünün size'ı ile eşit olması gerektiğidir. Örneğin 4 Byte'lık Integer veri türü için Byte array'de 4 adet eleman olmalıdır, Word türlü bir değişken için Byte array'de 2 eleman olmalıdır. "HELLO WORLD" string'i için Byte array'de 11 eleman olmalıdır gibi.
Mal sahibi, mülk sahibi
Hani bunun ilk sahibi ?
Mal da yalan mülk de yalan
Var biraz da sen oyalan...
Hani bunun ilk sahibi ?
Mal da yalan mülk de yalan
Var biraz da sen oyalan...