.net dilleri bilmiyorum,kısa kodu delphiye çevirirmisiniz..?

C# (C Sharp) veya Java ile ilgili konuları buraya yazabilirsiniz.
Cevapla
tugsat
Üye
Mesajlar: 132
Kayıt: 04 May 2009 08:30

.net dilleri bilmiyorum,kısa kodu delphiye çevirirmisiniz..?

Mesaj gönderen tugsat » 30 Nis 2010 08:52

Merhaba .Net dilleri ile şuan için ilgilenemiyorum aşağıdaki kodları delphi dilini bilen bir arkadaşımız benim için çevirebilirmi , şimdiden teşekkür eder iyi günler dilerim...

Kod: Tümünü seç

Dim pstr As String
Dim pbytes() As Byte
pstr = "2F05063005461727165540020496E666F726D6174696F6E5B 315D2E2E2E2032202500000000000000000000000000000000 000009DCF06D00000088007570635F6B615F74755F75707065 72006E696768746F6E6C696E655C0000000000000000000000 0000000001" & hexword
ConvHEX2ByteArray pstr, pbytes
SendPackets pbytes

tugsat
Üye
Mesajlar: 132
Kayıt: 04 May 2009 08:30

Re: .net dilleri bilmiyorum,kısa kodu delphiye çevirirmisiniz..?

Mesaj gönderen tugsat » 01 May 2010 11:38

Artık foruma giren yok heralde ..

Kullanıcı avatarı
lazio
Moderator
Mesajlar: 1526
Kayıt: 11 Tem 2003 03:55
Konum: İstanbul
İletişim:

Re: .net dilleri bilmiyorum,kısa kodu delphiye çevirirmisiniz..?

Mesaj gönderen lazio » 03 May 2010 09:55

bir string i byte array a çeviriyor

Kod: Tümünü seç

var
  mBuffer:array of Byte;
  m1:     string;
  I:      Integer;
  L:      Integer;
begin
  m1 := 'Hello,World!';
  L := Length(m1);
  SetLength(mBuffer, L);
  for I := 0 to L-1 do
  begin
    mBuffer[I]:=ORD(m1[I+1]);
  end;
Resim

..::|YeşilMavi|::..

tugsat
Üye
Mesajlar: 132
Kayıt: 04 May 2009 08:30

Re: .net dilleri bilmiyorum,kısa kodu delphiye çevirirmisiniz..?

Mesaj gönderen tugsat » 14 Haz 2010 03:03

Biraz geç baktım teşekkür ederim lazio..

Cevapla