如图,这个界面是怎么组成 的?有哪些控件呢?
第一个地方可以拖动,第二个好像是个按钮,
这个东西见到的地方很多,自己也尝试做了一下,但是始终不能实现效果。。。。 界面 控件 日志窗口
[解决办法]
拖动的应该是Panel,按钮应该是SpeedButton加一个图标
拖动可以用下面的代码:
procedure TfmMain.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
if (ssLeft in Shift) then
begin
ReleaseCapture;
SendMessage(Handle, WM_SYSCOMMAND, $F012, 0);
end;
end;