大侠救急啊，在Memo里循环输入数据使程序循环执行？
做一个简单程序要实现在Memo里输入一个数据，程序执行一次，再输入，再执行。
也就是说程序等待Memo的输入来判断是否执行。
问题点数：0、回复次数：12Top
1 楼xu_xinyu（雪候鸟）回复于 2003-05-04 11:42:51 得分 0
在memo的onchange事件中
判断memo的行数，如果增加了那么执行。
okTop
2 楼wanghvac（）回复于 2003-05-04 11:49:46 得分 0
再请问 xu_xinyu(雪候鸟)
我忘了说了
Memo里每次输入完数据，程序运行，然后，memo里的数据我设置自动删除。
所以每次memo里只有一个数据。
这样的话，需要判断memo的行数吗？应该怎么做啊？
谢谢Top
3 楼qibo999（行路者）回复于 2003-05-04 11:58:03 得分 0
Memo1->Lines->Strings，只要不为空就做.Top
4 楼wanghvac（）回复于 2003-05-04 12:05:02 得分 0
谢谢 qibo999(行路者)
是不是 Memo1->Lines->Strings； 就相当于一个判断句
可不可以这样用
if(Memo1->Lines->Strings)
{;}
我理解Memo1->Lines->Strings的返回值是true Or false
Top
5 楼JetKingLau（时差)(亦远亦近)(静坐常思已过 闲谈勿论人非 …………）回复于 2003-05-04 13:17:48 得分 0
if(Memo1->Lines->Count > 0 )
Memo1->Lines->Strings是不能直接使用的，要加下标，如：Memo1->Lines->Strings[0]
Top
6 楼wanghvac（）回复于 2003-05-04 16:36:36 得分 0
可能我没有把问题说清楚
在Memo1的OnKeyPress事件中程序如下：
void __fastcall TForm1::Memo1KeyPress(TObject *Sender, char &Key)
{
if (Key == VK_RETURN)
{
int i=0;
temp1[i] = Memo1->Text.ToDouble();
Memo1->Clear();
Key = 0;
i=i+1;
}
}
将Memo1中输入的数据存入temp1数组中，然后删除Memo1中的内容。
而我在程序的另一个Button里要不断应用Memo1中输入的内容。
也就是说memo1中的内容相当于数据采集。
现在问题是
1，怎么样将Memo1中输入的数字应用到Button中去。
即按下Button后，程序一直等待Memo1中的数字（memo1按下回车键后）。
2，也可以应用Temp1数组中的数字。怎么样temp1数组中的数字应用到Button中去。
谢谢了
Top
7 楼wanghvac（）回复于 2003-05-04 17:54:22 得分 0
好长时间没有人回；
再写一下。
在Memo中写入数据，回车后存储，并删除。
在另外一个Button中想要不断引用Memo的内容，即相当于从Memo进行数据采集。
问题是：
在Button中的程序，如何不断的采集Memo1中的数据。
谢谢
Top
8 楼qibo999（行路者）回复于 2003-05-04 18:05:59 得分 0
看不懂了，你的数据已经存到变量里了，你用就是了，可以对它进行判断，或做一个bool型标志来判断，再有你的代码很乱，我不清楚你的i有什么用？Top
9 楼wanghvac（）回复于 2003-05-04 18:14:58 得分 0
关键是button里要接受的数据来自于memo1的实时输入，如何判断Memo里已经输入了啊？
bool型标志如何做啊
我是新手，帮帮忙啊
谢谢Top
10 楼qibo999（行路者）回复于 2003-05-04 18:26:18 得分 0
我现在不太明白你的问题：你先click a button--等待memo1输入--memo1接受到return处理（清空memo，...）
我觉得逻辑有点混乱。你在Memo1->OnChange()里写代码不就行了？先让Memo接受输入，再按button处理（处理完后再清空memo）不行吗？Top
11 楼reallaowu（呵呵）回复于 2003-05-04 22:17:41 得分 0
我想在Memo1KeyDown事件中比较好
if(Key==VK_RETURN)
{
double x;
try{
x=Memo1->Text.ToDouble();
ShowMessage(2*x);
Memo1->Clear();
}
catch(...)
{
ShowMessage("Must Double");
}
}Top
