Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Обрабатывать события, не использую форму 
V
    Опции темы
ShadowDancer
Дата 14.8.2006, 21:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 100
Регистрация: 15.6.2006

Репутация: нет
Всего: нет



Есть какой -нить компонент, а в нём события smile, так вот как можно их обрабатывать не использую формы ?
PM MAIL   Вверх
Snowy
Дата 14.8.2006, 21:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484



События не зависят от наличия формы.
От нее зависят только оконные события.

Добавлено @ 21:27 
Естественно, любые события можно обрабатывать без формы.
PM MAIL   Вверх
Foley
Дата 14.8.2006, 21:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Фсемба Яцца
*


Профиль
Группа: Участник
Сообщений: 235
Регистрация: 31.1.2006
Где: Россия, Арх.обл

Репутация: 2
Всего: 7



там есть форма, где св-ва компаненты, а справа на форме есть еще одна вкладка, щелкай по ней и увидиш список событий (по названиям легко догадаться что они значат, например OnShow - значит при появлении), выбираешь нужное и двойным щелчком попадаешь на то место, где ты пишешь код для этого события
PM MAIL ICQ   Вверх
z-END
Дата 14.8.2006, 22:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


прафесар™
****


Профиль
Группа: Комодератор
Сообщений: 3014
Регистрация: 13.3.2003
Где: Венья, Пиетари

Репутация: 11
Всего: 102



Foley, а теперь еще раз перечитываем вопрос...


--------------------
Каждый чилавек пасвоему праф...а памоему НЕТ! 

PM WWW ICQ   Вверх
ShadowDancer
Дата 14.8.2006, 22:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 100
Регистрация: 15.6.2006

Репутация: нет
Всего: нет



Цитата(z-END @  14.8.2006,  22:04 Найти цитируемый пост)
Foley, а теперь еще раз перечитываем вопрос... 

Ага
Цитата(Snowy @  14.8.2006,  21:26 Найти цитируемый пост)
Естественно, любые события можно обрабатывать без формы. 

Как ?
PM MAIL   Вверх
z-END
Дата 14.8.2006, 22:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


прафесар™
****


Профиль
Группа: Комодератор
Сообщений: 3014
Регистрация: 13.3.2003
Где: Венья, Пиетари

Репутация: 11
Всего: 102



Цитата(ShadowDancerNew @  14.8.2006,  23:08 Найти цитируемый пост)
Как ?

давай так.. ты пиши что тебе надо... 
например  вызвать событие показа окна приложения без использования TForm у тебя невыйдет.  
так что думаю я ты не в ту степь пошел...


--------------------
Каждый чилавек пасвоему праф...а памоему НЕТ! 

PM WWW ICQ   Вверх
ShadowDancer
Дата 14.8.2006, 22:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 100
Регистрация: 15.6.2006

Репутация: нет
Всего: нет



Код

program Project1;

uses
windows;

begin
exit;
end.

В этом коде, создаю какой-нить ftp сервер например, и при подключении мне нужно сделать какое-нибудь действие. Вот...
PM MAIL   Вверх
Демо
Дата 14.8.2006, 23:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 30
Всего: 50



Цитата(ShadowDancerNew @  14.8.2006,  22:21 Найти цитируемый пост)
В этом коде, создаю какой-нить ftp сервер например,


И где он, этот ftp-сервер в коде?
К чему обработчик прикручивать?


--------------------
    
PM MAIL ICQ Skype   Вверх
DoZENT
Дата 14.8.2006, 23:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 326
Регистрация: 2.6.2006

Репутация: нет
Всего: 1



Цитата

Есть какой -нить компонент, а в нём события , так вот как можно их обрабатывать не использую формы ?

Так причем тут форма? Сам же написал, что обрабатывать нужно сообщения компонента. Или если ты компонент динамически создаешь, тогда в стиле WinAPI.


--------------------
Какая боль, какая боль, Internet Explorer 5.0...
PM MAIL   Вверх
Teran
Дата 15.8.2006, 08:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 590
Регистрация: 9.9.2005
Где: Украина, Запорожь е

Репутация: нет
Всего: 3



Код

program Project1;

uses
  Windows, Messages;

{$R *.RES}

var
wClass: TWndClass;
Msg: TMsg;

function WindowProc(hWnd,Msg,wParam,lParam:Integer):Integer; stdcall;
begin
if Msg = WM_DESTROY then PostQuitMessage(0);
Result := DefWindowProc(hWnd,Msg,wParam,lParam);
end;

begin
wClass.lpszClassName:= 'CN';
wClass.lpfnWndProc :=  @WindowProc;
wClass.hInstance := hInstance;
wClass.hbrBackground:= 1;
// wClass.hIcon := LoadIcon(hInstance,'MAINICON');
// wClass.hCursor := LoadCursor(0,IDC_ARROW);

RegisterClass(wClass);

CreateWindow(wClass.lpszClassName,'Title Bar',
             WS_OVERLAPPEDWINDOW or WS_VISIBLE,
             10,10,340,220,0,0,hInstance,nil);

while GetMessage(Msg,0,0,0) do
DispatchMessage(Msg);
end.

здесь обработка происходит в функции WindowProc
а вообще тут куча примеров для WinApi


--------------------
Ни цего не понимаю
PM MAIL ICQ   Вверх
dvamaster
Дата 15.8.2006, 08:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 559
Регистрация: 30.6.2004
Где: Россия : Курган

Репутация: 3
Всего: 10



у Windows 2000/XP есть не визуальное окно, которое только и делает что обрабатывает события
главное памяти не жрет

надо установить hWndParent в HWND_MESSAGE

Код

CreateWindow(wClass.lpszClassName,nil,
             WS_OVERLAPPEDWINDOW or WS_VISIBLE,
             10,10,340,220,HWND_MESSAGE,
             0,hInstance,nil);



--------------------
Хорошую информацию трудно добыть. Сделать с ней что-нибудь - еще труднее. /L. Skywalker/

Что же я сделал не так? /Король Лир/

Я делаю это для твоего же блага! /Любой родитель и палач/

PKUNZIP.ZIP /неизвестный/
PM MAIL WWW ICQ   Вверх
Snowy
Дата 15.8.2006, 09:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484



Эй, разошлись...
Человек говорит всего лишь про это: http://forum.vingrad.ru/index.php?showtopic=107198

Добавлено @ 09:17 
Код

uses Windows, IdFTP;

type
  TFTPClient = class(TIdFtp)
  public
    procedure OnFtpConnect(Sender: TObject); // обработчик события - метод
  end;

var ftp: TFTPClient;

procedure TFTPClient.OnFtpConnect(Sender: TObject); // тут его реализация
begin
  MessageBox(0, 'Есть коннект!', 'FTP', 0);
end;

function CreateFTPConnect: boolean;
begin
  ftp := TFTPClient.Create(nil);
  ftp.Host := 'localhost';
  ftp.OnConnected := ftp.OnFtpConnect; // здесь мы его назначаем
  try
    result := false;
    ftp.Connect;
  except
    result := false;
  end;
end;

PM MAIL   Вверх
ShadowDancer
Дата 16.8.2006, 21:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 100
Регистрация: 15.6.2006

Репутация: нет
Всего: нет



Teran, dvamaster, Snowy, спасибо, это то что надо...
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0888 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.