Delphi中如何在Memo中显示字符串啊?
刚刚接触Delphi,问题比较弱智我的form中有两个edit控件和一个memo控件,我想往memo中写个字符串,如下:unitCup_Connection;interf...
刚刚接触Delphi,问题比较弱智
我的form中有两个edit控件和一个memo控件,我想往memo中写个字符串,如下:
unit Cup_Connection;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, OleCtrls, OptoSnapIoMemMapXLib_TLB, StdCtrls,ExtCtrls;
type
TForm1 = class(TForm)
Error_Message: TMemo;
function GetDig_inModuleStates(ModuleNumber:longint;half_Bank:boolean;nStatePts:longint):AnsiString;
ends;
function GetDig_inModuleStates(ModuleNumber:longint;half_Bank:boolean;nStatePts:longint):AnsiString;
begin
if ((half_Bank And((ModuleNumber<8)or(ModuleNumber>15)))or((Not half_Bank) And((ModuleNumber<0)Or(ModuleNumber>7)))) then
begin
Error_Message.Text:='Wrong Module Number !';
.....
end;
end;
问题是我明明在type里声明了Error_Message是Memo型组件了啊,为啥Error_Message.Text:='Wrong Module Number !';一句无法编译通过?说Undeclared identifier: 'Error_Message'.为啥是"未说明的标识符"啊
急,求教!
......... 展开
我的form中有两个edit控件和一个memo控件,我想往memo中写个字符串,如下:
unit Cup_Connection;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, OleCtrls, OptoSnapIoMemMapXLib_TLB, StdCtrls,ExtCtrls;
type
TForm1 = class(TForm)
Error_Message: TMemo;
function GetDig_inModuleStates(ModuleNumber:longint;half_Bank:boolean;nStatePts:longint):AnsiString;
ends;
function GetDig_inModuleStates(ModuleNumber:longint;half_Bank:boolean;nStatePts:longint):AnsiString;
begin
if ((half_Bank And((ModuleNumber<8)or(ModuleNumber>15)))or((Not half_Bank) And((ModuleNumber<0)Or(ModuleNumber>7)))) then
begin
Error_Message.Text:='Wrong Module Number !';
.....
end;
end;
问题是我明明在type里声明了Error_Message是Memo型组件了啊,为啥Error_Message.Text:='Wrong Module Number !';一句无法编译通过?说Undeclared identifier: 'Error_Message'.为啥是"未说明的标识符"啊
急,求教!
......... 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询