yao518 2023-01-25 12:53 采纳率: 25%
浏览 48
已结题

滚动条拖动改变大小 delphi lazarus pascal


object Form1: TForm1
  Left = 256
  Height = 240
  Top = 145
  Width = 320
  BorderStyle = bsNone
  Caption = 'Form1'
  ClientHeight = 240
  ClientWidth = 320
  LCLVersion = '2.2.4.0'
  object Memo1: TMemo
    Left = 0
    Height = 240
    Top = 0
    Width = 320
    Align = alClient
    Lines.Strings = (
      'Memo1'
    )
    TabOrder = 0
  end
end  

这个csdn.net无法上传图片,我改用链接吧,我程序图在下面的链接
https://img-blog.csdnimg.cn/img_convert/2623492098e04e017c3f7754a237c448.png
这是一个TDBGrid控件,后面是我写的控件,把MEMO写在单元格内,但无法放大缩小弹开的MEMO(这个MEMO放在一个TFORM窗体上)。

这是窗体文件,但不能拖动改变大小!
我想在memo的右下角2个滚动条出现后,在右下角的交叉位置可以拖动改变窗体大小(这个地方还要放图标,不然用户不知道这里还有个功能)

例如:
https://www.jianshu.com/p/e5c75954ad25

  • 写回答

4条回答

      报告相同问题?

      相关推荐 更多相似问题

      问题事件

      • 系统已结题 2月2日
      • 修改了问题 1月28日
      • 修改了问题 1月28日
      • 修改了问题 1月28日
      • 展开全部

      悬赏问题

      • ¥15 这段有什么bug 为什么总报错
      • ¥15 关于#php#根据url判断选择加载模板应该如何解决?会的速来捡钱!
      • ¥15 Intel Realsense深度相机(D415/D435)拍摄梯子获取梯子点云
      • ¥50 unity使用easyar录屏更换视频保存路径
      • ¥15 CECGameSession::OutputLinkSevError(iRetCode=4) LINK超时
      • ¥20 出错 textread (第 124 行) [varargout{1:nlhs}]=dataread('file',varargin{:}); %#ok<REMFF1>
      • ¥15 tensor flow目标检测环境配置问题
      • ¥15 数据库float型转换精度问题
      • ¥15 运行您代码时出现报错,如何解决?(标签-回归|关键词-无法识别)
      • ¥50 android service弹出dialog,showdialog就出错,如何解决?