SpeedButton1问题

yuyupluck 2003-05-08 04:02:05
本人想在 SpeedButton1 中得到两行或两行以上的文字,但怎样都只能得到一行字,
帮我大侠!!
...全文
29 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
我不要昵称 2003-05-08
  • 打赏
  • 举报
 回复
Button1.Caption := 'Line 1'#13'Line 2';
SetWindowLong(Button1.Handle,
GWL_STYLE,
GetWindowLong(Button1.Handle, GWL_STYLE)
or BS_MULTILINE);
Button1.Refresh;
breezing 2003-05-08
  • 打赏
  • 举报
 回复
只能用代码赋值，用#13#10换行
flyfish99 2003-05-08
  • 打赏
  • 举报
 回复
speedbutton1.caption:='asdf'+#13#10 +'asdf';
delphi 网页浏览器
speedbutton1.Enabled:=false; speedbutton3.Enabled:=false; listbox1.Visible:=false; if fileexists('net.ini') then begin assignfile(mytextfile,'net.ini'); reset(mytextfile); i:=0; try readln...
Delphi 计算正负数绝对值.rar
　procedure TForm1.SpeedButton1Click(Sender: TObject); 　begin 　Edit2.Text := FloatToStr(Abs(-1.5)); 　end; 　procedure TForm1.SpeedButton2Click(Sender: TObject); 　begin 　Edit4.Text := FloatToStr...
delphi_随机滚动_抽奖
procedure SpeedButton1Click(Sender: TObject); procedure Button2Click(Sender: TObject); private s: TStringList; //从文件中读取数据 Current: Integer; //随机数产生的序号 Num: Integer; //数组中的...
delphi_XML
SpeedButton1: TSpeedButton; SpeedButton3: TSpeedButton; SpeedButton4: TSpeedButton; SpeedButton6: TSpeedButton; SpeedButton5: TSpeedButton; SpeedButton7: TSpeedButton; SpeedButton8: ...
Delphi获取BMP图片指定点RGB值.rar
　procedure TForm1.SpeedButton1Click(Sender: TObject); 　begin 　if OpenPictureDialog1.Execute then 　begin 　image1.Picture.LoadFromFile(OpenPicturedialog1.FileName); 　Form1.Canvas.Draw(0,0,...
Delphi

5,388

社区成员

262,730

社区内容

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章