procedure TfrmSort.Excute(DataSource:TDataSource);
begin
frmSort:=TfrmSort.Create(nil);
DS:=@DataSource;
frmSort.ShowModal;
frmSort.Free;
end;
begin
frmSort:=TfrmSort.Create(nil);
DS:=@DataSource;
frmSort.ShowModal;
frmSort.Free;
end;
這樣賦值之后﹐我怎么使用這個數據源(DS),要使用它的相關屬性和方法怎么用﹖
procedure TfrmSort.Excute(DataSource:TDataSource);
的錯誤﹗
不能定義為窗體過程﹐又在窗體過程中建立窗體。