如何声明并使用下面的函数type
Point=^node;
node=record
data:string;
link:Point;
end;function SearchPoint(StringForAdd:string):Point;请教各位,上面的东东具体放置的位置
Point=^node;
node=record
data:string;
link:Point;
end;function SearchPoint(StringForAdd:string):Point;请教各位,上面的东东具体放置的位置
解决方案 »
- 编译能通过,运行后点完按钮就出错了,SOS~~~
- 寻求建议:关于服务器端接受数据
- C语言的结构转换为delphi的,求高手指教,在线等..
- 想用EXCEL做套打,不知道可行否?
- 字幕滚动,闪烁的问题,高手帮忙解决,急,谢谢了
- 怎么样修改DBGRID里的数据???????????????
- 急急急,请指教,在线等
- 请大家帮忙解决!菜鸟有提问了!
- 请问怎样提取表中的字段名?
- 如何实现treeview的无限扩展,在利用数据表编程,能告诉一个思想就行,最好源源代码
- VCL架构剖析,DELPHI源码分析,DELPHI面向对象编程思想,这个3本书应该先看哪一本???
- 请教如何传递参数!!//能有图象的傅立叶变换demo给三百分
type TForm1 = class(TForm)
Button1: TButton; private
function SearchPoint(StringForAdd:string):TPoint;
{ Private declarations }
public end;
type
Point=^node;
node=record
data:string;
link:Point;
end;
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;type TForm1 = class(TForm)
private
function SearchPoint(StringForAdd:string):TPoint;
{ Private declarations }
public end;
type
Point=^node;
node=record
data:string;
link:Point; end;var
Form1: TForm1;implementation{$R *.dfm}{ TForm1 }function TForm1.SearchPoint(StringForAdd: string): TPoint;
beginend;end.
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;type
TForm1 = class(TForm)
private
{ Private declarations }
function SearchPoint(StringForAdd:string):TPoint;
public
{ Public declarations }
end;
type
Point=^node;
node=record
data:string;
link:Point;
end;var
Form1: TForm1;implementation{$R *.dfm}function TForm1.SearchPoint(StringForAdd: string): TPoint;
beginend;end.
这样就可以了哈,你要实现其他功能就自己添加了哈