![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Двойной клик по RXsplitter [D7, WinXP]
Spot © (2010-01-25 09:14:00)На форме есть 2 панели (как в Tjtal Commander) между ними RXsplitter (у обычного Splitter нет события ondblclick)
Panel1.align=alClient
Panel2.align=alRight
RXsplitter1.align=alRight
При двойном клике, хочу, чтобы RXsplitter разделил Панели на по центру окна.
procedure TForm1.RxSplitter1DblClick(Sender: TObject);
begin
Panel2.Width:=round(Form1.Width/2);
end;
Запускаю, премещаю сплиттер немного налево, делаю двойной клик, сплиттер очень быстро перемещается в центр и сразу возвращается обратно.
Оказывается если второй клик не отпускать, то сплиттер остается в центре, как только отпускаешь кнопку, тут же возвращается. Это глюк или что?
unitay (2010-01-26 17:09:00) [1]Используй этот: http://decoding.narod.ru/download/mycomponent/updatesplitter.zipкомпонент, он реализован наиболее просто.
ps: round(Form1.Width/2); лучше было бы заменить на (Form1.Width div 2)
brother (2010-01-25 12:04:00) [2]> а как рализовать эту идею?
для начала разобраться с
> Panel2.Width:= round(Form1.Width/2);
KSergey (2010-01-25 11:48:00) [3]> Spot (25.01.10 11:35) [4]
> Добавляю кнопку, в обработчике клика пишу:
> Все нормально работает
Тогда, видимо, событие двойного клика для этого не подходит.
Предлагаю в двойном клике посылать чебе сообщение через PostMessage, а в обработчике сообщения делать все, что нужно.
Spot (2010-01-25 11:35:00) [4]Добавляю кнопку, в обработчике клика пишу:
procedure TForm1.Button1Click(Sender: TObject);
begin
Panel2.Width:=round(Form1.Width/2);
end;
Все нормально работает
Spot (2010-01-25 11:30:00) [5]Братан, а как рализовать эту идею?
brother (2010-01-25 10:40:00) [6]> Это глюк или что?
так и должно быть ведь:
> RXsplitter1.align= alRight
а это что за шаманство?
> Panel2.Width:= round(Form1.Width /2);
DimaBr (2010-01-25 10:30:00) [7]Внимание!Здесьобсуждаются вопросы, связанные с разработкойкомпонентов, редакторов свойств, редакторов компонентов и экспертов IDE.
Вопросы по поискуи использованиюготовых компонентов, редакторов или экспертов являются нарушениемтематики и могут быть удалены.