Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Низкоуровневое программирование > Win Api
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.09.2008, 16:47   #11
Черничный
Форумчанин
 
Регистрация: 27.01.2007
Сообщений: 293
По умолчанию

вот вот! Это мне больше нравится! Сделать в dll и запихнуть это дело в фаил ресурсов. А можно пример заталкивания dll в ресурсы и извлечение ее от туда
Черничный вне форума Ответить с цитированием
Старый 13.09.2008, 16:49   #12
Черничный
Форумчанин
 
Регистрация: 27.01.2007
Сообщений: 293
По умолчанию

Цитата:
Сообщение от eoln Посмотреть сообщение
function HookProc(Code:integer; WParam:word; LParam:Longint):Longint; stdcall;
begin
//какие-то действия ловушки
result := CallNextHookEx(HookHandle,code,WPar am,LParam);
end;

что это значит "// какие то действия"Видимо здесь надо отлавливать нажатия, и приписывать их в строку(ну в строку наджо мне)
Черничный вне форума Ответить с цитированием
Старый 13.09.2008, 20:47   #13
Черничный
Форумчанин
 
Регистрация: 27.01.2007
Сообщений: 293
По умолчанию

Кароч, я нашел метод, сделаю через dll у нее больше плюсов. Буду dll эту запиивать в exe и оттуда ее по надобности доставать. Если кому надо то как это сделать:

1). открываем самый мощный текстовый редактор - Блокнот и начинаем ваять :
MYDLL RCDATA
mydll.dll

Записываем всё это как Lib.rc

2). Теперь для получения файла-ресурсов компилируем получившийся у нас Lib.rc :
brcc32.exe Lib.rc

3). Получили Lib.res, который необходимо прикрепить к нашему проекту, для этого используем директиву {$R Lib.res}

Нижеследующий код иллюстрирует как можно прикрепить *.res файл к проекту и извлечь его при необходимости:
Код:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}{$R Lib.RES}

procedure TForm1.Button1Click(Sender: TObject);
var
  MyDll1: TResourceStream;
begin
  MyDll1 := TResourceStream.Create(hInstance, 'MYDLL', RT_RCDATA);
  try
    MyDll1.SaveToFile('duck.dll');
  finally
    MyDll1.Free;
  end; {try}

end;

end.
В результате сборки получим EXE-файл. При нажатии на кнопку формы будет создан файл duck.dll в той же директории, из которой была запущена программа (помните, что если dll-файлы в вашей системе имеют атрибут скрытых,- созданный duck.dll тоже будет невидимым
Черничный вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как отследить нажатие кнопки Обновить из PHP? Timpi PHP 4 11.07.2008 09:16
Как отследить отпускание клавиши? Zefick Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 2 27.05.2008 19:14
Нажатие клавиши format Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 1 05.05.2008 15:25
Отследить нажатие одной кнопки в другом приложении... ActiveX Win Api 4 04.04.2008 23:05
Клавиатура, нажатие клавиши Yogik™ Помощь студентам 4 21.11.2007 00:05