关于显示窗体的问题[请求]**

chinamg

我在一个功能下做了两个窗体，我想在一个窗体中点击一个按钮就将另一个窗体显示出来盖住原有的窗体，我该怎么做？（代码怎么写）

jiahaiming

最初由 chinamg 发布
[B]我在一个功能下做了两个窗体，我想在一个窗体（TForm1）中点击一个按钮就将另一个窗体(TForm2)显示出来盖住原有的窗体，我该怎么做？（代码怎么写） [/B]

var
  lfrm: TForm2;
begin
  lfrm := TForm2.create(context);
  lfrm.showmodal;
end;

chinamg

接下来怎么把选中的数据后面写流程编号呢

jiahaiming

DataSet.first;
while not dataset.eof do
begin
  if dataset.fieldbyname('fcheck').asstring := true then
  begin
    dataset.edit;
    dataset.fieldbyname('aa').asstring := 'abc';
  end;
  next;
end;

atiger

楼主，还有问题吗？没有就结帖了