delphi 在一个页面中定义了type mystr=class myid:integer; myvalue:string; end;如何在另一个页面中使用myid? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}uses 这个单元;procedure TForm1.FormCreate(Sender: TObject);var ys : mystr;begin ys := mystr.create; try ys.myid := 100; finally ys.free; end;end;end. unit Unit2222;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;typemystr=classmyid:integer;myvalue:string;.........在另一个页面中使用myid的时候要uses Unit2222 这个单元文件。 请教一点小问题; Tfilestream问题请教 请教调用delphi数据库匹配 可能还是 数据库的问题 我的动态链接库还是要报错的 在 退出整个程序时! afterpost的问题. 怎样操作外部服务器上的数据库,大家提点建议,UP有份 关于两个表的合并 如何让RichEdit中的文本不可编辑 学习delphi以后,再也体会不到原来写c/c++程序的那种快感了! 在dephi中动态创建存储过程问题(在线等待!) 同时连接2台以上数据库服务器 Delphi程序编译错误
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}uses 这个单元;procedure TForm1.FormCreate(Sender: TObject);
var
ys : mystr;
begin
ys := mystr.create;
try
ys.myid := 100;
finally
ys.free;
end;
end;end.
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
mystr=class
myid:integer;
myvalue:string;
.........
在另一个页面中使用myid的时候要uses
Unit2222 这个单元文件。