請各位大哥可以幫我看看嗎??一個轉碼的程式.... |
|
尚未結案
|
|
kevinhue
一般會員   發表：23 回覆：42 積分：13 註冊：2003-05-06 發送簡訊給我 |
各位大哥:以下是我寫的一個程式,他主要的功能是讀取Memo上的兩個字串,然後結合成一個碼,我的問題是
(一)我現在將所有的碼放入char inbuff[65536]的buffer
那我想在另一個button上將我的inbuff的值讀出至String.....請問這樣可以嗎??
(二)那假如有一個合成的值是"0x00"那這個值是可以放到字串嗎??
void __fastcall TForm2::Button1Click(TObject *Sender)
{
int a;
String Temp3,Temp4,Temp5,Temp6;
int j,k,l,cou1,dataval1;
char dataval2;
char inbuff[65536];
Temp3 = Memo1 ->Text;
k=Temp3.Length();
l=k/2;
Memo3 -> Text = k;
for (j=1;j<=k;j=j 2)
{
Application->ProcessMessages();
Memo4 -> Text = j;
Temp4=Temp3.SubString(j,2);
CGauge2->Progress=j;
dataval1=StrToInt(Temp4.Insert("0x",0));
dataval2=dataval1;
Temp5=AnsiString(dataval2);
Temp6=Temp6 Temp5;
}
Memo2 -> Text = Temp6;
} kevinhue
|
|
tech_state
版主  發表：44 回覆：638 積分：641 註冊：2003-02-10 發送簡訊給我 |
kevinhue, 您好
我改了一點地方，您看看這樣是不是還符合您的需求
k=Temp3.Length()-2;
/*dataval1=StrToInt(Temp4.Insert("0x",0));
dataval2=dataval1;
Temp5=AnsiString(dataval2);
*/
Temp5=Temp4.Insert("0x",0);
您的第一個問題：只要將char inbuff[65536]設成全域變數即可
第二個問題：0x00可以放到字串，但是他是一個空字串，可能無法顯示出來。
=================================
涵養怒中氣。謹防順口言。留心忙裡錯。珍惜有時錢。
是非終日有，不聽自然無
天下本無事，庸人自擾之 發表人 - tech_state 於 2003/05/30 17:11:19
|
|
turboted
版主 發表：95 回覆：754 積分：452 註冊：2002-07-23 發送簡訊給我 |
發表時間：2003-05-30 16:39:26
IP:218.160.xxx.xxx 未訂閱
系統時間：2024-05-19 7:26:16
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |