Question

delphi类的创建

现在需要将选中的某一行数据集的信息添加到在dbgrid上新加的一行上，要求是调用类，求大神给出类的创建方法，急求，在线等，谢谢了

Answer 1

interface之后，implementation之前的任意位置都可以声明类定义。

interface之后implementation之前都可以用procedure关键字来声明过程，根据位置，其作用域、可见范围都不同

每个过程/函数体前（过程/函数中第一个Begin之前）都可定义并实现子过程/子函数，用于调用、嵌套、递归

相信这样说是比较简单的。
============================================
补充：类是不能直接用的，首先要声明一个该类的实例并创建该实例才能使用，以你的代码为例子，假设窗体为Form1，按钮为Button1，那么应该这样写：

type
myclass=class(object) //最好把父类(祖先类)指明
public
s:string;
end;

....

procedure TForm1.Button1Click(Sender: TObject);
var
my:myclass;
begin
my := myclass.create;//使用前必须先实例化
try
my.s := 'dddd';//给类成员（属性）赋值
button1.caption:=my.s;//读取类成员（属性）
finally
my.free;//最后一定要记住把不再使用的内存释放了
end;

end.
这样可以么？