to blazingfire(烈焰) 但是这样那点位置不是变动了吗?我是用TPrinter直接打印的,我的卡片是一定的,当卡片放进去,就要在那个点位置输出,象填空一样;我自己想了个办法是取整输出,数据前面放点空格,但是定位的精度很难控制,你有什么建议吗?谢谢!to lxpbuaa(桂枝香在故国晚秋) DBGrid1.SelectedField.AsString只是我选中的那个格网的数据,那么属于同一记录的其他格网中的字段用什么表示呀?我要同时表示他们的数据,就象在Stringgrid中就可以用一个二维组表示不同网格的数据。 谢谢 to superljj() canvas.textout(x,y,s)中的x,y指什么呀,我用尺子量100等于实际的3厘米左右,而且随着设置中分辨率改变好象也在变化,请解释一下,还有我没用第三方控件,我是用TPrinter对象直接打印的。 谢谢
var
txtX,txtY:Integer;
begin
.......
txtX:=Round(X);
txtY:=Round(Y);
.......
end;
DBGrid1.SelectedField.AsString
—————————————————————————————————
MaximStr := '宠辱不惊,看庭前花开花落,去留无意;
毁誉由人,望天上云卷云舒,聚散任风。';
if Not Assigned(I) then
I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样,改为“=”等';
I.Desire := '加不加分随你';
—————————————————————————————————
打印中的pixels,指的是xx pixels/inch, 一般xx=96,要区分开。
网格用TQRShape 来做。
DBGrid1.SelectedField.AsString只是我选中的那个格网的数据,那么属于同一记录的其他格网中的字段用什么表示呀?我要同时表示他们的数据,就象在Stringgrid中就可以用一个二维组表示不同网格的数据。
谢谢
to superljj()
canvas.textout(x,y,s)中的x,y指什么呀,我用尺子量100等于实际的3厘米左右,而且随着设置中分辨率改变好象也在变化,请解释一下,还有我没用第三方控件,我是用TPrinter对象直接打印的。 谢谢