Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Пример TGrabHandle

Автор: Randomazer 31.3.2014, 15:37

Здравствуйте, есть ли у кого работающий пример с использованием TGrabHandle? В интернете подобного не находил.

Спасибо.

Автор: PointerToNil 1.4.2014, 10:46

да не проблема!!!

Код


program GrabHandleExample;

uses Windows;

type TGrabHandle = class
  public
    procedure DoWorking;
  end;

procedure TGrabHandle.DoWorking;
begin
  MessageBox(0, 'This is TGrabHandle working!', 'Hello!', 0);
end;

begin
  with TGrabHandle.Create do
    DoWorking;
end.

Автор: Poseidon 1.4.2014, 11:07

PointerToNil, заняться нечем? TGrabHandle - это класс, который отвечает за работу тех самых точек-маркеров, которые окружают редактируемый контрол в Design-time. Твой быдло-код тут вообще неуместен.

Автор: PointerToNil 1.4.2014, 11:26

ну, извините. у меня дельфи 7 и поиск в исходниках RTL/VCL ничего не дал
тредстартер, искали в своём RTL/VCL? обычно там работающие примеры
P.S. с 1 апреля вас!

Автор: -Сергей- 23.4.2014, 09:41

Цитата(PointerToNil @ 1.4.2014, 15:26)

дельфи 7 и поиск в исходниках RTL/VCL ничего не дал

А он и не даст, потому как код закрытый. Об этом знают только разработчики.

вот, может это поможет
http://www.raysoftware.cn/?p=14