设置AdvStringGrid的WordWrap属性为False
然后添加AdvStringGrid的过程
GetAlignment(Sender: TObject; ARow, ACol: Integer;
var HAlign: TAlignment; var VAlign: TVAlignment);
begin
if acol=0 then
begin
HAlign:= taCenter;
VAlign:=vtaCenter;
end;end;
然后添加AdvStringGrid的过程
GetAlignment(Sender: TObject; ARow, ACol: Integer;
var HAlign: TAlignment; var VAlign: TVAlignment);
begin
if acol=0 then
begin
HAlign:= taCenter;
VAlign:=vtaCenter;
end;end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货