frxReport1.Clear; frxReport1.DataSets.Clear; frxDBDataset1.DataSet := dm_day_list.ado_day_list; frxReport1.DataSet := frxDBDataset1; frxReport1.LoadFromFile(wpath + '患者每日清单.fr3'); frxReport1.PrintOptions.ShowDialog := false; // frxReport1.PrintOptions.Printer := 'BTP-R580(U) 1'; frxReport1.PrepareReport(True); frxReport1.Print;
本文转自鹅倌51CTO博客，原文链接： http://blog.51cto.com/kaixinbuliao/1331887，如需转载请自行联系原作者