13,871
社区成员
发帖
与我相关
我的任务
分享请问下这句用BCB怎么写。
procedure TForm1.Button2Click(Sender: TObject);
var
TextFormat: TTextFormat;
begin
TextFormat := [tfSingleLine, tfCenter, tfVerticalCenter]; //这句用C++ Builder要怎么写。谢谢。
StringGrid1.Refresh;
TButton(Sender).Caption := '居中对齐';
end;
var
TextFormat: TTextFormat;
begin
TextFormat := [tfSingleLine, tfCenter, tfVerticalCenter]; //这句用C++ Builder要怎么写。谢谢。
StringGrid1.Refresh;
TButton(Sender).Caption := '居中对齐';
end;
...全文
请发表友善的回复…
发表回复
