BCB 請問 Twidestring 如何轉成 Tbytedynarray    自己寫了一段CODE，但是發生 Twidestring 1.29K大小 轉成 Tbytedynarray 卻只有82Byte 如果您需要轉換的資料我再寄給您。 CODE如下，請您幫忙解惑，謝謝！    

DynamicArray TForm1::toByteArray(WideString string)
{
  wchar_t* buffer = string.Copy();
  int length = string.Length() << 1;  //此行得到的length是82Bytes 實際長度是1325Bytes
  DynamicArray bytes;
  bytes.set_length(length);
  for(int i = 0; i < string.Length(); i  ) {
    int a = buffer[i];
    int first = a >> 8;
    int second = 0x00FF & a;
    int firstIndex = i << 1;
    int secondIndex = i << 1   1;
    bytes[firstIndex] = first;
    bytes[secondIndex] = second;
  }
 

發表人 - wenson 於 2005/05/09 23:32:57

您好:    PO程式碼的方式請參考版規說明,煩請修改謝謝您的配合 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=58991

謝謝版主提醒，小弟下次會注意！但不知能否修改我發表的內容呢？

在我回應的連結裡面有說明喔

我已加上 〔code〕〔/code〕，請問這樣符合嗎？ 不好意思麻煩您！

沒錯,就是這樣,感謝您的配合

string.Length()傳回值是多少？ 你怎麼確定實際長度有1325bytes?

Source File是從PKI FUNCTION產生的，該FUNCTION EXPORT存成一個檔案。如果您願意的話我可以將檔案寄給您！萬分感激！