本文整理自网络,侵删。
1:将 Timage 放入 TScrollBox内,即
[1]设image1.parent:= ScrollBox1;
[2]在Object Inspector中将 Timage 拖到 TScrollBox上,使之成为子结点
[3]先拖一个TScrollBox,再 拖一个 Timage到 TScrollBox 内
2:image1.AutoSize:=true; //必须手动设
3: ScrollBox1.AutoScroll:=true;//默认
相关阅读 >>
Delphi stringgrid 实例3: 本例功能: 1、修改 tstringgrid的默认宽与高; 2、添加行; 3、确认当前单元并赋值.
更多相关阅读请进入《Delphi》频道 >>