Форум программистов и сисадминов КиберфорумКиберФорум - форум программистов и системных администраторов. Бесплатная помощь в решении задач по программированию, математике, физике и другим наукам, решение проблем с компьютером, операционными системами. |
|
Темы раздела Delphi: WinAPI
Параметры сетевых адаптеров
Здрасьте.
Кто-нибудь знает, как добраться до дополнительных параметров сетевого адаптера, вот этих?
Нажатия кнопки мыши
Нужно в оконном режиме игры симулировать нажатия кнопки мыши Моусе евент - инпут не работает
Игра защищается от автокликов есть ли другой способ без инжекта
procedure SimulateMouseClick(x, y:...
Последовательный порт Ввод вывод данных
Добрый день. У меня тут возникла проблема с передачей и приёмом данных через com порт. Пишу на Делфи 7 использую функции WinAPI. На порту висит Ардуинина с примитивным кодом: что пришло - то ушло....
ActiveX OnKeyDown key=27
Привет, форум!
Делаю ActiveX компонент для отечественной САПР.
В основе компонента TPanel на которой
располагается ТEdit.
Я ввожу текст в поле эдита нажимаю Enter
в OnKeyPress обрабатываю...
Вызов dll с многопоточностью внутри и проблема обновления progressbar в VCL приложении
Здравствуйте!
Есть dll на си, в которой запускаются несколько потоков на расчет.
Библиотека вызывается с delphi.
И зависает progressbar (как, собственно, все визуальные), пока все потоки не выйдут...
Закрытие процесса
Проблема такая:
Сервис запускает программу. Программа по какому-либо условию закрывается методом Close.
Программа всё делает нормально за исключением того, что не может закрыться и висит в дереве...
Упаковка и распаковка CAB архивов на Delphi
Я просто нашёл код и решил им поделиться. Может кому-то пригодится. Как упаковать и распаковать CAB-файлы.
Пускай это будет отдельный модуль :)
unit Unit2;
// Source:...
Delphi 11. Передать нажатие клавиши в Онлайн игру
Обсуждалось здесь https://www.cyberforum.ru/delphi-winapi/thread2871342.html, но тема не моя да и умолкла давно.
И так имеем: игра Perfect World ruoff. Зачем мне это надо? - просто учусь и вспоминаю...
EnumChildWindows
function GetWindowTitle(hwnd: HWND): string;
begin
SetLength(Result, 255);
SetLength(Result, GetWindowText(hwnd, PChar(Result), 255));
end;
function GetWindowClass(hwnd: HWND): string;...
Определить, занят ли COM-порт
Добрый день! В программе используются несколько com портов. Как можно проверить используется ли порт какой либо программой, кроме как способом нового открытия?
Заранее спасибо!
Добавлено через 3...
FindWindowEx Button и Edit другого приложения
Тема довольно заезжена, чего только не наслушался и что FindWindowEx кривой ...
Но вот не могу найти Button или Edit в окне запущенного приложения Delphi
var
Form1: TForm1;
hNewCaption:...
Вывод окна на передний план
Доброе утро. Всех с праздниками, прошедшими и грядущими!
Ситуация такова. Мне нужно, чтобы второй экземпляр моей программы не запускался, а вместо этого на передний план выводилось окно уже...
Хитрая работа с Num Lock
Доброго дня, уважаемые коллеги.
Может быть мой вопрос покажется банальным, но это только на первый взгляд.
Итак:
Есть форма, управление которой происходит с помощью горячих клавиш на NumPad. В том...
Как скопировать файл из одной папки в другую?
Подскажыте пожалуйста, можно как-то при помощи Delphi скопировать любой файл с одной папкив другую?
Работа с WinAPI (PostMessage)
проблема с окном нарисованным в дериктХ,надло послать строку чату,например, фокус получают чат если нажать ентер(те сначала окну надо послать ентер). посылаю на хендл окна через пост,но ничего не...
Обработка сообщений в консольном приложении
Добрый день.
Передо мной стоит достаточно простая задача. Настолько простая, что за два дня поисков я не нашёл решения. Похоже, оно всеми считается очевидным.
Есть консольное приложение,...
Полноценное управление LPT портом в Delphi, как лучше реализовать?
Большая просьба помочь разобраться в вопросе, как лучше управлять из Delphi LPT портом, так чтобы программа была универсальна и работала под системами от Windows 98 до Windows 7. Очень давно...
Перехват вывода консольного приложения
Если попал не туда, извиняйте и перенаправьте куда надо...
Всем привет, проблема в следующем: пытаюсь сделать перехват вывода консольного приложения, перепробовал множество кодов, но везде одно и...
Нажать кнопку в чужом окне
Предположим для простоты я написал 2 проекта и обои в делфи.В первом приложении имеется 1 кнопка и 1 лабел который и выведет надпись - "Кнопка была нажата!". Естественно это событие и написано на...
Ввод текста в чужое окно
Программой из делфи необходимо ввести текст в окно которое я показал красной стрелкой.
Заголовок окна я еще могу менять а вот то что нужно неполучается, язнаю что тут искать уже нужно окно в окне....
функция winApi CreateFileMapping()
Сейчас столкнулся с проблемой. Полное непонимание FileMapping
Есть следующий код. Он должен выводить в мемо строку из swap-файла..
Не работает
Подскажите, в чем проблема.
procedure...
Как узнать путь к папке temp на WinAPI?
Добрый день?
Подскажите пожалуйста как узнать путь к папке temp на WinAPI?
Как изменить параметр в структуре в WinAPI?
Использую Апи Avicap32 в Делфи. Но вот не задача там структура CaptureParms а в ней переменная Fyield, ее нужно изменить на true, а у меня не получается это сделать. Нашел в MSDN пример изменения...
Протокол купюроприемника ccNET
Доброго времени суток уважаемые форумчане! Купюроприемник CASHCODE SM подключен к программе написанной на delphi(модуль для работы по протоколу ccNET) ! Все прекраcно работает, но появилась...
Ошибка при работе с Clipboard: "Сannot open clipboard. Отказано в доступе."
Хотел написать программу для автоматической замены текста в буфере обмена, но при обращении к буферу получаю ошибку "Сannot open clipboard. Отказано в доступе.".
Вот весь код:
program...
Асинхронная запись в файл
Как строку str записать в файл report.rxr асинхронно(с использованием overlapped). Как на примере, только у меня последовательно. Хочу сделать параллельную запись
procedure writetofile(const str:...
Inject dll, а также вызов функции из этой же dll
Всем привет, заинжектить dll в другой процесс получилось, но еще необходимо вызвать функцию в этой длл, каким образом это реализовать?
Ну а поконкретнее, после инжета в процесс, нужно вызвать...
Размер свободного места на диске
Как узнать размер свободного пространства на диске в мегабайтах???
Чужое окно
Возможно ли, зная название чужого окна, скопировать из него всю текстовую информацию, которую только можно скопировать?
Работа с последовательным портом
Добрый день! В работе с железом я новичок, поэтому прошу объяснения и помощи. Заранее спасибо =)
На просторах инэта нашёл статейку и исходник к ней: http://www.delphimaster.ru/articles/comport2/...
Нужно отредактировать файл логов Win7 (формат EVTX)
Всем доброго времени суток !
Столкнулся с необходимостью отредактировать заранее сохраненный файл логов Windows 7 ("save1_system.evtx"). Требуется удалить пару строчек... не могу разобраться как...
Отправка текста в чужое окно через PostMessage
Ребза привет)
ситуация такая отправляю текст в чужое окно
через PostMessage
окна каждый раз разные..
сразу объясню почему выбрал этот метод.. поправьте меня если ошибаюсь
чтобы отсылать...
Серийные номера материнской платы и процессора
Всем привет. Каким образом проще и надежнее будет получить уникальный идентификатор компьютера? Например серийные номера материнской платы и процессора? Может у кого то есть готовая функция?
...
SetupAPI and DelphiXE7
Доброго времени суток! помогите, пожалуйста, разобраться. У меня данный код FillDeviceList в Delphi 7 работает нормально, а в Delphi XE7 в DeviceName пишется какая-то абракадабра. XE7 Появился у меня...
Перехват завершения работы компьютера
Здравствуйте,подскажите пожалуйста как правильно обработать эти процедуры
procedure WMQUERYENDSESSION(var Msg: TMessage);message WM_QUERYENDSESSION;
procedure WMENDSESSION(var Msg:...
секундомер в функциях WinApi
нужно написать в Delphi сендомер,начинающий и заканчивающий свою работу по нажатию одной клавиши, но не через Ttimer, а с помощью функций WinApi
Есть текст программы, но она к сожалению не работает,...
Загрузка файла всегда вызывает ошибку 12029
Доброго времени!
Есть код, где hURL всегда = nil.
GetLastError даёт при этом код 12029
The attempt to connect to the server failed.
fileURL :=...
Запуск консольного приложения и результат его выполнения
Приветствую всех. Столкнулся со следующей проблемой.
Есть консольное приложение, выполняется через командную строку, возвращает текст. Мне нужно запустить это приложение из моей программы в делфи и...
Управление браузером Opera из программы на Дельфи
доброго времени
нужно из delphi запустить браузер opera и управлять им - всего 3 действия:
1. открыть окно с адресом
2. выполнить JS
3. получить код страницы
delphi 7 / хе2,3,5,10 - неважно...
Калькулятор в delphi
Помогите пожалуйста срочно))) завтра сдавать)) как сделать, чтобы калькулятор считал, например: 2+3+4-6, а не только последнее действие
Как снять скриншот со второго монитора?
Или как получить хендл второго монитора (для процедуры GetDC)? Screen.Monitors.Handle возвращает только HMONITOR и GetDC следовтельно выздает ошибку can't draw raw image from device.
Найти окно чужой программы по названию кнопки в окне
Доброго времени суток дорогие знатоки!
Помогите пожалуйста с возникшей проблемой:
1. как определить окно если известно название кнопки(Button), так как Caption окна отсутствует(
2. как я понимаю...
Определить, сколько осталось свободного места на жёстком диске
Подскажите можно ли на Delphi узнать сколько осталось места на жёстком
диске? Или как придумать алгоритм что бы программа останавлевалась
тогда когда на указаном диске остаётся мало места. :?:
Всплывающее уведомление в области трея
Помогите, ломаю голову несколько дней, как реализовать средствами WinApi? Программа умеет сворачиваться и разворачиваться из трея, вот только как уведомление показать.........
ComboBox и WinAPI
Привет всем!
Есть одна проблемка :(:'(
У меня на форме есть ComboBox. Соответственно, если я выбираю что-нибудь, например, строку 1, то появляется окошко сообщения, например, "Выбрана строка 1"....
Определить аппаратный серийный номер флешки
Как определить аппаратный серийный номер флешки, именно НЕ серийный номер тома. В интернете масса вариантов но все они именно на определение номера тома. Буду благодарен если появится решение.
...
Очередной sendmessage и wm_keydown
Имеется следующий код:
finereadHWND := FindWindow(nil, 'Открыть изображение');
SendMessage(finereadHWND, WM_SETTEXT, 0, integer(pchar('asd')));
SendMessage(finereadHWND, WM_KEYDOWN,...
Работа с USB-считывателем смарт-карт
Уважаемые специалисты, подскажите...
1)...как в delphi можно выполнить подключение к портам, в частности USB?
2)...как в delphi можно узнать данные портов и подключенных к ним устройств?
3)...как...
Управление чужим приложением на Qt5
Пытаюсь получить HWnd объектов в вайбере и вообще не как не получается, если смотреть по классам то они все имеют один и тот же класс Qt5QWindowIcon.
Нахожу окно:
Hnd:= FindWindow(nil,'Viber...
Работа с COM портами WinAPI, конкретно функция ClearCommError
Всем доброго времени суток, я вообще не программист, программирую от случая к случаю, пишу программу для работы с Com портом, котрая должна общаться с таблом типа LED MATRIX. От компонентов решил...
Получить информацию о всех установленных USB флешках в ListBox
Доброго времени суток!
Помогите пожалуйста, как мне получить информацию о всех установленных USB флешках в ListBox, некий аналог USBDeview!!!!! Уже два дня мучаюсь!! кроме списка принтеров ничего...
Работа с именованными каналами
Требовалось написать 3 программы( 1 сервер + 2 клиента) для обмена данными через канал передачи данных. Что-то не работает.
Сервер:
procedure TForm1.Button1Click(Sender: TObject);
begin
...
Перехват данных с USB устройств класса HID
Доброго всем времени суток!
Как перехватить поток данных с USB устройства, которое относится к классу HID ( UBS HID - http://http://ru.wikipedia.org/wiki/USB_HID ) ?
Конкретно в моем случае я...
Закрытие активного окна стороннего приложения
Доброго времени суток. Начались каникулы и решил заняться самообразованием в Delphi. B понадобилась мне программка для завершения процесса любого активного окна при помощи горячей клавиши. Только...
SendMessage, отправка клика в стороннее приложение
Приветствую обитателей!
Вопрос такой. Пытаюсь отправить клик в стороннее приложение, но чего-то не слушается меня код =(
На примере пэйнта:
h:=findwindow(nil, PChar('Безымянный - Paint'));
if...
Переход на новую строку в edit
Уважаемые гуру подскажите как организовать вывод текста в поле "edit" в несколько строк?
поле "edit" создаю следующим образом:
Memo1 := CreateWindowEx(WS_EX_CLIENTEDGE, 'edit', nil, WS_CHILD or...
HOOK на клаву не пашет
Всем привет. Вот Код программы (РАБОТАЕТ нормально), но при попытке установить хук выдает ошибку...
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,...
Как сдвинуть чужое окно?
Как можно сдвинуть или просто изменить чуть размеры формы стророннего приложения?
Из делфи разумеется.
Например код закроет Калькулятор и прочие приложения-
procedure...
Win API, как отследить было ли закрыто окно приложения.
Нахожу HWND приложения которое запущено, командой FindWindow. Через 10 секунд повторная процедура поиска выдаёт HWND = 0, то есть не может найти HWND окна приложения, но окно этого приложения ещё...
Захват содержимого экрана. Как они это делают?
Всем привет. Подскажите, плиз...
вот так у меня захватывается экран:
tv := getdc(0);
w := GetDeviceCaps(tv, HORZRES);
h := GetDeviceCaps(tv, VERTRES);
BitBlt(bmp.Canvas.Handle, 0,0, w,h,...
Получение координат значков на рабочем столе
Требуется написать программу, которая выводит координаты всех иконок на рабочем столе. Пробовал сделать по готовому решению, найденному в интернете:
uses CommCtrl;
var i, k:Integer;
XYold, ...
Хук на DblClick
НЕ совсем в моей программе (я ее переделываю) используются всем известные функции MouseDown, MouseUp. в них пользователь ВЫБИРАЕТ объект, находящийся на форме (он выделяется для дальнейшего...
Рекурсивный Поиск файлов
Доброго всем времени суток, я к вам со следующей проблемой: необходимо разобраться с рекурсивным поиском файлов на всем компьютере желательно, но пока хотя бы с локальным в конкретно заданной...
Организовать проверку. Запущена ли служба
Подскажите, уважаемые господа форумчане, как эту задачу реализовать на чистом WInAPI?
Крякозябры вместо русских символов на Windows 10 - при включенной опции: Использовать Юникод (UTC-8) для поддержки языка
Здравствуйте!
Есть программный код на Delphi 7, нормально работает под Windows XP/Vista/7/8/8.1 и до определенных пор на Windows 10. Работает практически при любых языковых настройках - т. к....
SHGetKnownFolderPath и System32
Пытаюсь определить путь к папке 'Windows\System32\' при помощи SHGetKnownFolderPath.
На msdn нашёл подходящий GUID для функции (FOLDERID_System или FOLDERID_SystemX86), но в делфи его нет (использую...
Как по HWND узнать, открыто ли окно
Открываю консольное приложение из своей программы на Delphi. Получаю идентификатор окна (HWND).
Нужна возможность узнать, не закрылось ли окно. Пробовал функцию IsWindow(hwnd), но обнаружил, что она...
Имя шрифта, подгруженного из ресурса
Возможно ли узнать имя шрифта, подгруженного из ресурса (приватно). Функции для работы с перечислимыми шрифтами в этом случае не работают, хотя сами шрифты прекрасно отображаются.
const
...
Placeholder и Delphi
Можно ли в Delphi (!)7(!) организовать placeholder к Edit'ам. Вроде где-то читал начиная с 2010 можно это реализовать, используя SendMessage. Возможно ли как-нибудь выкрутится в семерке?
Текущее активное окно
Напишите, пожалуйста, код для получения информации о текущем активном окне (как можно больше информации).
По возможности объясните этот код.
Как задать размер стороннего окна при открытии и расположение от формы (справа/слева)?
Подскажите! Открываю некий скрипт в программе. Команду подаю из делфи и собственно открываю этот самый скрипт в нужной мне программе.
Как задать размер 500x300 для запускаемой программы и его...
Импорт REG файла
Всем привет, у меня задался вопрос, странное поведение в реестре. Проблема такая, не могу импортировать рег файл программно, я не первый раз
работаю с реестром, но эта проблема первый раз. Файл не...
Открыть USB устройство функцией Createfile
Доброму всем дня.
Уважаемые ГУФы прошу Вашей помощи в решении следующего вопроса. У меня есть USB устройство на базе Atmega32U4. Устройство сконфигурировано, как CDC Communication port. В диспетчере...
Копирование/перемещение памяти
Добрый день.
Вопрос заключается в следующем:
Есть указатель на кадр полученный от камеры/файла, но этот кадр отражен зеркально по горизонтали.
Как его максимально быстро перевернуть?
изспользовал...
Функция GetClientRect
Мне нужно узнать координаты клиентской части монитора.
Вот часть кода программы
procedure TFormMain.FormCreate(Sender: TObject);
var
ARect : TRect;
begin
GetClientRect(...,...
Работа с COM портом
Добрый день, уважаемые знатоки!
Помогите пожалуйста выработать логику работы программы.
Имеется электродвигатель, с одним магнитом на валу. Имеется датчик Холла (магнитного поля) и имеется вот...
Функция ShowWindow работает неверно
делаю фичу: чтобы нельзя было запустить копию программы, если запускается, то закрыть и найти, показать первую программу. В самой проге, на главной форме написал такой код, который ищет окно с "armm"...
Скорость COM порта
Здравствуйте.
Ситуация такая. Налаживаю общение по UART между ПК и МК. Все делал на одном компьютере и вроде все шло хорошо пока не перешел на другой. Тут начались проблемы:
При чтении порта...
Отключение dll от стороннего процесса
Всем доброе время суток подскажите каким образом можно отключить длл от стороннего процесса?
Пробовал через такой код но не получилосьfunction UnInjectModule(ModulePath: PAnsiChar; ProcessID:...
TimeZone (SetTimeZoneInformation)
Delphi XE3, Windows 7/XP.
Нужно изменить часовой пояс (timezone) по GMT или UTC. Например, GMT -5 - часовой пояс "Восточное время (США и Канада)".
Нашёл такой класс. Но там не совсем то, что...
Убрать рамку окна
Убрал рамку окна
SetWindowLong(wnd, GWL_STYLE, GetWindowLong(wnd, GWL_STYLE) and not(WS_CAPTION or WS_THICKFRAME));
Границы окна остались прежними, а внутренняя область уменьшилась на высоту...
Нужна помощь с WinAPI
Такая проблема: необходимо использовать функцию WinAPI - settimer, где первому параметру надо передать идентификатор окна.
Какой идентификатор надо взять, если мы удалили форму из нашего приложения?...
Проект не видит SetupAPI.dcu
Здравствуйте, имеется проект для работы с внешними устройствами. Нужно использовать setupAPI. Я положил SetupAPI.pas в папку с проектом, подключил как модуль, но в uses по-прежднему распознаёт...
Работа с Mutex
Доброго дня суток!
Решил блокировать доступ к файлу для разных потоков через Mutex, что то не идет(
Оба потока реализованы подобным образом:
begin
FileMutex := CreateMutex(nil, false,...
Подкорректировать код для перехвата API
Код библиотеки для перехвата,но в нем есть ошибки
library ApiHk;
uses
TLHelp32, windows;
type
far_jmp = packed record
PuhsOp: byte;
PushArg: pointer;
RetOp: byte;
end;
Delphi и Крипто Про ЭЦП SDK
Всем привет. Стоит задача написать клиентское приложение, в котором необходимо будет использовать цифровую подпись и шифрование данных. Разработка будет вестись на Delphi 7. На данный момент скачал...
Глобальный Хук на клавиатуру и MessageDlg
Здравствуйте Уважаемые Знатоки! Недавно возникла задача отлавливать нажатые клавиши на клавиатуре во всей Винде, определить скорость, если скорость выше n то проверять на ключевые слова и если всё...
winapi функция CreateProcessWithLogonW
Здравствуйте.
Пытаюсь запустить приложение от имени другого пользователя
program Logon2;
{$APPTYPE CONSOLE}
{$R *.res}
uses
Ввод информации в текстовые поля стороннего приложения
Здравствуйте уважаемые форумчане!
Столкнулся с такой проблемкой:
Нужно в чужом приложении(написанном на PowerBilder) найти элементы Edit или Grid (пока не знаю) и закинуть в них текст. Caption...
Узнать заблокирован ли компьютер?
Здравствуйте! У меня возникла проблемка. Нужно определять заблокирован ли компьютер. Нашел вот такую функцию:
function IsWorkstationLocked: Boolean;
var
hDesktop: HDESK;
begin
Result := False;...
Список пользователей
Всем привет!
подскажите как получить список пользователей как в диспетчере задач?
GetAsyncKeyState
Доброго всем времени суток.
Хочу сделать: на главной форме есть кнопка, по щелчку которой открывается вторая форма с неким кодом в таймере, код выполняется до тех пор, пока не будет нажата левая...
WinAPI
как сделать так чтобы программа открывала блокнот и открыла нужный текстовый файл и каждая буква текстового файла записывалась в блокнот заданный интервал времени?
Программный вход в учётную запись
Доброго времени суток, уважаемые форумчане. Интересует следующий вопрос - возможно ли программно (служба) войти в учётную запись пользователя, защищённую паролем. Подробнее - имеется компьютер с...
Запуск приложения из сетевой папки
Добрый день!
В сетевой папке есть БД состоящая из файлов: program.exe и Base.mdb
С локальной машины пытаюсь запустить исполняемый файл командой:
WinExec(Pchar('\\Programmist\1\program.exe'),...
Хинты-подсказки (balloons)
Добрый день.
Пытаюсь реализовать показ хинтов-подсказок (balloons). Показывать (в определенном месте) и скрывать хинт я должен самостоятельно (например при нажатии кнопки F1 показывать, при...
Приоритет процесса моей программы
Привет всем.
У меня есть программа и я хочу чтобы она работала быстрее. Для этого мне нужно повысить приоритет программы в Диспетчере задач.
Допустим моя программа называется Test. Как ей...
WinInet Download File
Нужна небольшая помощь, как этот кусок кода отвязать от консольного приложения к нормальной программе?
Уже и в поток всовывал, что только не делал. Буду благодарен за помощь, спасибо!
program...
Интерактивная работа с консолью
Приветствую всех .. есть проблема
задача организовать интерактивное взаимодействие между моей программой и чужой консольной
Взаимодействие нужно именно интерактивное отправил команду получил...
CF_MYFORMAT мешает скопировать данные в буфер обмена из TMemoryStream
Я нашла в сети код, для копирования в буфер обмена, любых данных (из TMemoryStream):
procedure TForm1.Button8Click(Sender: TObject);
var
hbuf: THandle;
bufptr: Pointer;
X : TMemoryStream;...
Как отловить сообщение WM_LBUTTONDOWN если прога на чистом WinApi
Подскажите, пожалуйста. Как такое сделать?
Я написал пример, но там не совсем то, что мне надо получилось. Я хочу чтобы все объекты окна были в файле ресурсов, а не добавлять в него нужные объекты...
Программа переводящая текст из Edit в ListBox (WinAPI)
Помогите, нужно написать программу, в окне создается Edit, ListBox и кнопка, при нажатии кнопки, текст написанный в Edit должен быть выведен в ListBox
Запуск приложения и ожидание завершения
Вечер добрый.
Собственно сабж. Нужно запустить приложение и отловить его завершение.
Использовал данную ф-ию
function ExecAndWait(const FileName, // Запуск процесса
...
Запуск консольного приложения из другого приложения
Я понимаю, что мой вопрос уже разжеван. Однако точного ответа я пока на него не нашел.
У меня есть некоторое приложение. Я хочу по нажатию на кнопку запустить другое (консольное) приложение и...
Серийный номер материнской платы и windows 10
Всем привет, народ подскажите как вытащить серий номер мат платы на ОС Windows 10? в гугле нашел этот код
program Project1;
{$APPTYPE CONSOLE}
{$R *.res}
uses
Winapi.Windows,
...
Последовательный порт в основном потоке
Здравствуйте!
Приведите пожалуйста пример программы, в которой взаимодействие с COM-портом происходит в одном потоке с формой. В качестве примера достаточно организовать ожидание получения любого...
Отправить нажатие клавиши в другое окно
wnd:=GetCapture();//получаем хендл куда отправлять нажатие
SendMessage(wnd, WM_KEYDOWN, VK_F1, 0);
SendMessage(wnd, WM_KEYUP, VK_F1, 0);
почему-то нажатие не отправляется, как быть?
Фоновый режим программы
Подскажите, чисто теоретически, как организовать фоновый режим работы программы.
Т.е. я запустил программу, запустил кнопкой внутри выполнение процесса, нажал закрыть программу и она должна...
Запись и чтение параметров принтера через WinSpool.SetPrinter
Доброго времени суток, коллеги. Есть некая проблема, о которую я сломал голову.
Имеется принтер, поддерживающий двухстороннюю печать, с помощью WinSpool.SetPrinter я устанавливаю тип двухсторонней...
Создание простого окна на WinAPI
Здравствуйте. Как будет выглядеть этот исходный код на языке Delphi?
/*WinAPI приложение. Минимальный
набор функций для отображения окна.
Эта программа станет базовой заготовкой для всех...
Ошибка Access Violation в CreateProcess
procedure Tfrm_Main.RunDosInMemo (CmdLine: string; OutputMemo: TMemo);
const
ReadBuffer = 2400;
var
Security: TSecurityAttributes;
ReadPipe, WritePipe: THandle;
start: TStartUpInfo;
...
Нажать кнопку в окне стороннего приложения
Здравствуйте. Как с помощью VBscript нажать на кнопку Start в этом окне>>>
Спасибо.
Не буду заморачиваться, на Delphi напишу прогу)
Посему переносим тему в Delphi
Смена курсора
не работает =\ что не так?
procedure TForm1.Button13Click(Sender: TObject);
var path:string;
begin
opendialog1.Execute;
path:=opendialog1.FileName;
curs:=loadcursorfromfile(addr(path));...
Узнать о пренадлежности THandle к Menu\PopupMenu в чужом приложении
Доброго времени, есть некий массив дескприптеров (handles) окон собранный функцией перечисления EnumChildWnd(). Как в нем массиве, можно определить, что определенное окно относится именно к...
SetWindowText не пишет строку в Edit
Добрый день!
Поскажите пожалуйста, в чём может быть проблема
Есть Edit:
hEdite:=CreateWindow('edit',
'0',
ws_visible or ws_child or ws_border or...
KeyboardProc, глобальный хук клавиатуры, dll
Написал dll для установки хука на клаву, по книге "Нестандартные приемы программирования на Delphi (Ю. Ревич)"
Программа должна отлавливать нажатия клавиш и записывать их в текстовый файл в 16-ичном...
WinApi и подсказки (ToolTips)
Пытаюсь разобраться как прикручиваются хинты к элементам интерфейса под WinApi...
Чистые приложения на WinApi пишу давно (но не часто =), вроде бы все сделал правильно, но подсказки не появляються,...
Скиннинг приложения. Используя PNG, Посредством WinAPI
Привет! Сделал кейген, и теперь хочу сделать ему красивую оболочку, есть исходник на масме, но
мне его сложновато понять, большой слишком, быть может у кого нить есть исходник как такое можно...
Подмена IP
Возможно осуществить подмену ip адреса непосредственно перехватом Api? те использовать свой трафик а ip отображался другой?
Не получается нажать на кнопку в чужом окне
Пытаюсь найти окно и кнопку в нем, по классу, класс узнал через spy++
Делаю проверку, h1, панель на которой кнопка, ее видит нормально, а вот саму кнопку ни в какую
procedure...
WriteProcessMemory в Delphi 7 и в RAD Studio 10.4.1
Здравствуйте.
Возникла странная проблема.
Есть рабочий код изначально написанный в D7
Код из D7
var
DllName : PChar;
BW, Size, Hdl : Cardinal;
ParamAddr : Pointer;
Как в Windows 10 передать нажатие клавиш в окно MMORPG игры?
Здравствуйте.
Я на ноутбуке, находящемся под управлением Windows 7 x64, пишу небольшую программу, которая должна по таймеру передавать в окно MMORPG игры (название не хотел бы пока говорить)...
Получить дескриптор процесса, по его имени
Всем привет.
Есть структура PROCESS_INFORMATION. Она заполняется только функцией CreateProcess, то есть когда создаётся процесс. Меня интересует только такой член структуры как hProcess(дескриптор...
Ошибка в работе функции EnumWindows
Доброго времени суток!
Использую в своей программе функцию EnumWindows для поиска чужого окна определенного типа. Определяю свою функцию EnumWindowsProc для опознания нужного окна из числа прочих....
Диспетчер задач на Delphi7
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,TlHelp32;
type
TForm1 = class(TForm)
Анализ сети
Здравствуйте. Мне нужно написать программу анализа сети на компьютере. В связи с этим возникло несколько вопросов. Программа по сути простая.
Логика:
Запускается программа, появляется ip адрес...
Открыть MS Word 2003 или 2007 или 2010 в XP или 7
Всем привет! столкнулся с проблемой. Надо из делфи запустить мс ворд. Ну это не сложно. проблема в том, что я сижу на WinXP а вдруг в семерке он не запустится так как путь к эксешнику совсем другой?...
Консольные процессы Parent и Child
Помогите реализовать, пожалуйста.
Написать программы двух консольных процессов Parent и Child, которые выполняют следующие действия.
Процесс Parent:
1. Создает бинарный файл, записи которого...
Как программно включить индикатор NumLock?
Нужно программно включить индикатор NumLock. Нижеприведенный код почемуто не работает. Может кто в курсе? (ОС Win XP SP2, Delphi 7.0 Enterprise)
procedure TForm1.Button1Click(Sender: TObject);
VAR ...
Dll inject в exe
Насчет того, как внедрить dll в процесс вопросов нет, но вот возможно ли внедрить dll в не запущенный exe ? вот так я внедряю dll в процесс :
function GetPID(ExeFileName: string): dword;
var...
Delphi и сканер
Добрый день.
Купил сканер Metrologic MS9500 Voyager.
Нужно считать штрих-код и найти его в базе данных.
База готова, а вот со сканом беда.
Очень много гуглил, и вот что уже сделал:
*Поставил...
Создание кастомного Pagecontrol
Всем доброго времени суток !
Появилась идея создать собственный PageControl с собственной отрисовкой вкладок компонента минуя WinApi.
Но я столкнулся с рядом проблем:
1.Какова механика работы...
Обводка текста на кнопках в RAD Studio 10.4.1
Здравствуйте.
Начав изучать RAD Studio 10.4.1 заметил что у кнопок почему-то есть полупрозрачная обводка текста. Выглядит крайне странно. Что удивительно у кнопки типа TButton такого нет. Данную...
Считать HWID
Помогите , как считать уникальный ID железа. и вывести его в label1 например.
Буду безмерно благодарен
Перехват API
Здравствуйте, подскажите пожалуйста как можно перехватить функцию ReadFile? В интернете достаточно много информации, но разобраться с ней самому не получается... :( Конкретней интересует перехват...
Измение схемы управления электропитанием компьютера из программы на Delphi.
Помогите, кто может чайнику.
Как программно измениь схему управления электропитанием компьютера в Delphi.
Если можно с кодом.
Could not convert variant of type Dispatch into type (String) - такая ошибка появляется на 1% компьютеров
Имеется программа с привязкой к материнской плате и процессору, все нормально в целом работает.
Привязка выполняется на основе функции GetWMIString (код на Delphi 7 приведен ниже),
В целом все...
CreateProcess() и запуск приложения
Служба отслеживает наличие процесса запущенного приложения, если такового нет - стартует его.
procedure TPrntScnOnline.Timer1Timer(Sender: TObject);
var StartInfo: TStartUpInfo;
...
Считывание QR-кода
Здравствуйте!:)
У меня возникла такая незадача: надо считать QR-код с веб-камеры.:cry:
У кого есть компоненты, исходники юнитов или некие другие способы решения - скиньте плиз...
Если не туда...
Как транслировать изображение и звук с камеры на другой ПК применяя AVICAP32.DLL? (получение данных для передачи)
В MSDN четко сказано, что AVICAP пригоден для передачи аудио/видео но как не описано. Научился записывать данные с камеры, микрофона в файл, но как получить данные в пригодном формате для пересылки...
Таймер до отключения компьютера
Доброго времени суток. Недавно сделал таймер на отключение компьютера. Но беда в том, что выключается только по тому времени что записано в командах.
Выглядит примерно так
procedure...
Функция GetFileTime
Делаю встроенную обновлялку для своих систем. Обнаружил интересную особенность:
Файл лежит на расшаренном ресурсе в сети.
1. Если ресурс подключен как сетевой диск и обращение к файлу...
Как экспортировать COM-интерфейсы из чужой сторонней DLL? А этот "Import a Type Library" падает
Доброй ночи!
Есть некая DLL от компании Intel. По некоторым сведениям там есть COM-объект и имеются интерфейсы/константы/перечисления. Правда сама DLL почему-то не зарегистрирована в реестре.
Я...
Запуск процессов с диалоговыми окнами в службе
Есть служба которая отслеживает запущена ли некоторая программа(программы имеют оконный интерфейс) или нет, если нет - запускает. Когда это был обычный процесс, а не служба то все работало. Сейчас же...
Как защитить коммерческую программу от копирования?
Здравствуйте. Вопрос избитый, но время идет и способы находятся. Может кто знает или применял когда либо, что либо к защите программы. Своей программы или к программе клиента.
Нужно защитить...
Глобальный хук клавиатуры для системных приложений. Почему зависает?
Здравствуйте.
Имеется задача: перехватывать нажатие клавиш во всей системе. После изучения статей про хуки написал что-то очень близкое к правде.
Имею звуковой сигнал (простой пи-пип) на любую...
Поиск данных в памяти чужого процесса
Не могу понять почему не находит нужные мне данные
................................
const
GB4 = 4294967296;
var
hProcess: Cardinal;
MBI: TMemoryBasicInformation;
FS: TFileStream;
...
Delphi и Winapi: Send и Recv
Здравствуйте, появилась такая проблема не могу разобраться с использованием функций Send и Recv в Delphi. Почему-то, когда я передаю сообщение строкой описанной внутри кода:
Message_For_Resp :=...
Получение Handle открытого окна
Открываю окно - и мне надо получить его Handle
Делаю вот так
var
SEInfo: TShellExecuteInfo;
h : THandle;
pid : cardinal;
begin
ZeroMemory( @SEInfo, SizeOf(SEInfo));
SEInfo.cbSize :=...
Как получить список открытых окно юзера из под системной службы?
День добрый! Необходимо мониторить юзверей на предмет занятости.
Проблема в том что в логфайл не идет запись имен окон. Либо нет подключения к десктопу, либо я что то не так делаю.
Код события...
Delphi + АТС Panasonic NS500 + RanCom
Добрый день уважаемые.
Задался вопросом интеграции АТС и программы своей. Пока реализовал на основе communication assistant. Из возможностей только получения номера звонящего, этого мало.
Нашел...
Получение информации о выполняемых процессах
Здравствуйте. Делаю программу в Delphi XE2, которая выдаёт информацию о выполняющихся в данный момент процессах.
На форму добавил мемо-поле "Info" (в которое грузится информация) и кнопку "Button4",...
WinApi и Google Chrome
Здравствуйте. Подскажите, кто знает:
1. как получить весь HTML-код из открытого google chrom 'a (из текущей открытой вкладки).
2. как перейти по ссылке так (пользовался ShellExecute), чтоб не...
Как отловить событие WM_PAINT рабочего стола
Подскажите, как отловить (hook) события: WM_PAINT, нажатие кнопок мыши и др. на рабочем столе или в каком-то другом приложениее. Возможно ли это сделать не вынося код за пределы одного модуля (т.е....
WaitForMultipleObjects в моих кривых руках не работает
Доброго, почитал много тем на stackoverflow и в гугле но все же чето не выходит подождать потоки, либо ждет только один.
Все хендлы валидные. Мне нужно найти жесткие диски в многопотоке , т.е 1...
удалить папку через winapi
как удалить в дельфи через winapi папку например c: emp
Combobox в WinApi
подскажите ответ плз, как обработать дочернее всплывающее окно ComboBox'a, чё делать непойму.
Создаю Combo: hComboBox:=CreateWindow('COMBOBOX','COMBOBOX',WS_CHILD or BS_NOTIFY or WS_VISIBLE or...
WinAPI как сделать свой Hook
Есть клиент знаменитой игры Lineage.ru
Так по сути,Клиент обрабатывает всю информацию через динамическую библиотеку Engine.dll где расположены почти все функции клиента.Как сделать хук.Что бы...
Найти дескриптор окна "Калькулятор"
Проблема в том ,что при определении дескриптора калькулятора
выдается 0, т.е. хотя калькулятор и открыт с помощью WinExec(процедура Button1Click)
функция FindWindow (процедура Button2Click)его...
Не удается выполнить исходящий вызов, так как приложение обрабатывает входящий синхронный вызов
И снова добренького вечера)
Столкнулся с такой проблемой, может кто знает пути выхода из нее.
Есть процедура чтения свойств флешки:
procedure GetUSBID();
var
Pos1 : LongInt ;
begin
...
Не получается отловить события
Здравствуйте! Утилита контролирует файловый оборот на разделах ПК, подхватывает съёмные носители, если таковые вставляются. Но смущает один маленький нюанс. Когда пользователь пытается безопасно...
WINAPI работа с окнами
Помогите пожалуйста разобраться с двумя проблемками...
создаю окно следующим образом:
procedure runproject; // действие по нажатию кнопки
begin
Wnd1 := CreateWindowEx ( 0, WndClass,...
Winlogon Notification Package
Добрый день.
Нужно отловить вход пользователя в систему. Прочитал про Winlogon Notification Package, написал dll:
library TFLNotify;
uses
Windows,
System.SysUtils,
System.Classes;
A Win32 API function failed / перехват ввода с клавиатуры
Ловлю A Win32 API function failed, без объяснений и кода ошибки, при попытке показать окно, в котором такая конструкция:
private
StdEditProc: procedure(var Msg: TMessage) of object;
...
Глобальный хук мыши
Подскажите, пожалуйста, почему при таком способе перехвата событий мыши, курсор(не самой игры, а системный) пропадает при запущенном 3D приложении.
var
foo: TPoint;
function HookProc(Code:...
Построчное чтение файла функциями WinAPI в Delphi
Задача. Просьба привести примеры построчного чтения файла методами WinAPI. (CreateFile,ReadFile). Интересен пример а не ссылка на документацию.
Добавлено через 42 минуты
Начало возможно будет...
Выполнение консольных команд
Доброго дня. Возможно ли реализовать на делфи выполнение заранее заданных консольных команд? Как я понял, ShellExecute запускает cmd с указанными параметрами. А как выполнить уже в cmd некий набор...
Delphi 7. Как получить информацию о установленном железе и список установленных драйверов к нему
В гугле я уже был, там мало интересного на эту тему для Delphi 7. Если кто то сталкивался с этим поделитесь с начинающим. Буду благодарен дельному совету или толчку в нужную сторону.
Как запустить exe-шник c помощью createprocess?
Я не знаю какие значения надо вписывать при создании процесса кпроме Appname,Directory и т.д. просто с ShellExecute всё было проще! Я бы хотел получить готовый код. Заранее благодарен!
Как отследить какая программа использует некую dll?
Всем привет! Допустим есть dll стороннего приложения. Как определить кто еще использует ее помимо того самого приложения? Или обращается к ней... И как ее оградить от этого(если это вообще возможно)?...
Отправка и прием данных с USB HID термометра
Здравствуйте, у меня вот такой эталонный термометер - https://termexlab.ru/#!/ru/product/lta-e-termometr-laboratornyij-elektronnyij-250900/
Работаю в среде Delphi 7, подключил библиотеку Jedi,...
Получение Handle окна
Привет.
Подскажите простую WinAPI функцию, с помощью которой я могу получить Handle окна.
У меня есть только класс окна, в строковом виде.
Но можно использовать также и Title.
Как вытащить параметр displayproperties->logicaldpi?
Подскажите пожалуйста как вытащить параметр LogicalDpi на delphi7?
Как корректнее поместить/скопировать текст из LPWSTR в WideString?
Добрый день!
Системный COM-объект выдаёт/заполняет мне LPWSTR. Причём зачастую требует вызов CoTaskMemFree() после того как данная информация становится больше не нужна.
Я подумал, что мне будет...
Откуда при чтении из COM-порта берутся 99 байт?
Здравствуйте!
Этот отрывок кода взят из рабоче программы, которая работает около 2-х лет и судя по отзывам - успешно. Она написана на С++, я изменил только синтаксис, чтобы было понятно Дельфистам....
непонятки с библиотекой nss3.dll
var
// -------------------- описание функций из nss3.dll
NSS_Init : function(configdir: pchar): dword; cdecl;
NSS_Shutdown : procedure; cdecl;
PK11SDR_Decrypt...
Открытие файла в уже открытой копии программы
Имеется программа с ассоциированными расширениями файлов. Как сделать так, чтобы если программа уже открыта, и пользователь двойным кликом запускает ассоциированный файл, то он открывался в уже...
WM_CLOSE
Есть код
a:=char(196)+char(232)+char(241)+char(239)+char(229)+char(242)+char(247)+char(229)+char(240)+' '+char(231)+char(224)+char(228)+char(224)+char(247)+'...
Sylfaen шрифт в Form.Caption и в Menu
Всем здравствуйте. Tакая история:
В первый раз в жизни понадобилась "интернационализация" моей программы. У меня установлен Win XP Home SP3 Spanish (Испанский), установлена визуальная тема "Luna...
Имитировать клик мышью по обьекту в окне сторонней программы
Есть программа-панель управления звуковой картой, с фиксированным размером окна, так вот если написать программу первоначально в которой будет допустим 5 Button`oв 0 25 50 75 100 %, насколько...
Перехват Send(ws2_32.dll)
Создаю программу для ограничения доступа юзеров к определенным сайтам .
Использую библиотеки для перехвата ExtendedAPIFunctions и apihooktools .
Проблема в том, что запрос браузера отображает...
Добавить события к классу
Здравствуйте! Мне нужно написать модуль с кнопкой. Вот, что получилось:
unit newcontrol;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,...
DbGrid без VCL на winapi
Можно ли в delphi средствами winapi (без VCL) создать объект dbgrid? если да то можно попросить небольшой пример?
Как получить имя пользователя по PID
Здравствуйте.
Делаю диспетчер задач.
Возник вопрос, как получить имя пользователя по PID процесса? Возможно ли такое?
Вот код:
var
Ippe:TProcessEntry32;
i:Integer;
Snap:THandle;
begin
//...
beginthread и параметр
unit Unit1;
interface
uses
Forms, Dialogs, Windows, SysUtils, Classes, Controls, StdCtrls;
type
TMsgRecord = record
thread : Integer;
Почему у меня работает а у других нет?
В крациях: Я сделал русик на онлайн игру через Delphi 7 и у меня все работает и изменяет байтbI а у друга прога сделанная с помощью Delphi 7 вbIдает ошибку или вообще не русиfицирует. Можно ли...
Обход VirtualProtect
Здравствуйте уважаемые форумчане.
Собственно пишу что-то наподобие чита к игре и возникли некоторые проблемы.
Античит мне не даёт использовать Read/writeprocessmemory. Точнее он даёт, но через...
Запись звука с микрофона в файл WAV
Здравствуйте друзья! Думаю многим начинающим программистам Delphi будет интересна эта тема. К делу! В общем пытаюсь средствами API Windows записать звук с микрофона, а затем сохранить этом звук в Wav...
Проблема с правами доступа.
Буду очень признателен, если кто-нибудь поможет мне с одной проблемой:
Мне надо написать программу, использующую функции: : GetSecurityInfo, SetSecurityInfo, GetNamedSecurityInfo,...
Выполнить проверку жесткого диска через Delphi
Доброго времени суток господа!
У меня возникла проблема. Делал программу для анализа и диагностики ПК, анализа много а диагностики нет.
Мне посоветовали сделать кнопку отрывающий диагностику диска...
Программная вставка картинки в Word
Друзья! Помогите разобраться.
В файле Word имеются слова, которые представляют собой ссылки на графики Excel.
Прога должна вместо них вставить графики.
Я это делаю так.
...
FindWindow('NOT_EXISTS', nil) возвращает не ноль, а текущее активное окно
Что за хрень, не пойму!!!...
procedure TForm1.FormCreate(Sender: TObject);
var
h:hwnd;
begin
h:=windows.FindWindow('any text here', nil);
sleep(h);
end;
Подсчитать статистику встречаемости букв в тексте
нужно написать программу. Не знаю как... Кто что подскажет ?
Имитация нажатия клавиш в невыделенных окнах
Как сымитировать нажатие клавиши в любом окне виндовса не выделяя его?
ReleaseDC или DeleteDC?
Доброго времени суток. Объясните кто знает и кому не сложно. Чем отличаются ReleaseDC и DeleteDC? И какую функцию лучше использовать?
Запустить процесс
Запустить некоторый процесс(процесс может изменятся(в програмном коде), т.е. нельзя надеятся на FindWindow(нельзя использовать)) и вывести на экран Все окна принадлежащие данному процессу.
Скачивание файла на компьютер по FTP c WinInet
Привет всем.
Пытаюсь сделать программу для связи с сервером по ftp. Попробовав реализовать скачивание/закачивание файлов с помощью компонента IdFTP, понял что файлы скачиваются/загружаются...
Выделение окон
Можно как-то сделать такое выделение окна?
Как прикрепить иконку к exe?
Нужно прикрепить иконку к готовому exe-файлу. Я так понимаю, что нужно создать в нём секцию ресурсов, а в неё добавить эту иконку. Как это всё реализовать?
Передать нажатие клавиш в окно RDP
Здравствуйте Ув. Форумчане!
Перерыл MSDN в поисках решения на свой вопрос, но ничего путного пока найти не удалось.
Смысл таков, есть устновленный MSRDPCLient9 на форме. Происходит удаленное...
Служба Windows и Controls.pas
Вечер добрый!
Столкнулся с проблемой: программа написанная для тестирования считывания содержимого флешки работает отлично, НО как только перенес все в службу - ошибка: Undeclared identifier:...
Обновление битмапа для Layered Window?
Создаю layeredWindow на основе битмапа с предустановленным альфа-каналом.
Все отображается верно, окно можно перетаскивать и все такое, но после старта окно перестает перерисовываться, т.е. к...
Запустить и скрыть консольное приложение
Всем привет.
У меня есть функция для запуска программ
function StartProccess(filepath: string; const CommandLine: string): DWORD;
var
StartupInfo: TStartupInfo;
ProccessInfo:...
Список контролов в другом приложении
Приветствую всех, подскажите куда копнуть - хочу получить список контролов, состоящих из TImage, находящихся на общем TPanel в другом приложении. Попробовал через FindContol - но возникает ошибка...
Как правильно инициировать StartupInfo при запуске внешнего приложения CreateProcess?
Собственно задача запустить внешнее консольное приложение в отдельном окне с заданными свойствами из основного с помощью данной функции, в частности надо чтобы на дочернем окне был заданный...
Поиск строки Treeview чужого окна и перевод на нее фокуса
Помогите! Суть задачи такова. В окне чужой программы имеется дочернее окно с компонентом Treeview (класс TreeView20WndClass). К Treeview через winAPI я добрался. Сколько строк в нем я получаю. А как...
Чтение и распознавание sms в Delphi
Добрый день, коллеги!
Хочу сказать сразу, что с Дельфи последний раз общался ещё в институте. Однако, нужда заставила вспоминать.
Суть задачи:
Есть USB-модем. На данный модем время от времени...
Хук на клавиатуру
Есть такая ловушка
Library Hook;
Uses
Windows,Messages,Dialogs,sysutils;
var
H: THandle;
Function HookProc(Code:Integer;Wparam:Word;Lparam:Longint): Integer;stdcall;
begin
if...
Функция winApi WriteFileEx()
Сейчас столкнулся с асинхронными файловыми операциями (I/O).
Нашел в сети исходник который должен записать на дискету файл в асинхроном режиме, т.е. функция возвращает управление, до того как...
Программа иногда не запускается в Windows 10
Ранее в Windows 7 проблем говорят не было. Программа очень старая, писалась ещё в 98ом году на delphi, далее просто корректировалась разными программистами (приходили-уходили). После перехода на...
Как работать с компрессорами и декомпрессорами в VFW
В MSDN написано прилично как открывать AVI файл как сжимать и разжимать изображение и звук, даже как вставлять текст. Но как соединить эти все обрывки примеров в один рабочий пример по сжатию данных...
Как узнать сирейный номер флешки на Делфи
Как узнать сирейный номер флешки и внешнего винчестепа на Делфи
зарание спасибо
Привязка к железу
Как можно просто, привязать программу к серийному номеру своего жёсткого диска?Заранее спасибо:p
WinApi с нуля, немного о циклах...
Приветствую всех!
Сегодня я решил рассказать для начинающих, что же такое WinApi. Да, многие слышали, что приложения получаются на нем очень маленькие, в районе 10кб и это не шутка! Но, пытаясь что...
FileMapping
Проблема с FileMapping. Здесь выкладывать код не буду, т.к. будет тяжело читать. Кину ссылку на прогу, чтобы можно было легче понять мою проблему (проблема аналогична, что и в этой программе)
...
удаление папок и файлов без winAPI
Кто подскажет как не используя win API при помощи DELFI 6.0 удалить папку вместе с файлами и другими папками (можете назвать их каталоги, директории). Через win API у меня идет несовмещение с другимм...
COM порт и очистка очереди
Почему, если я очищаю очередь COM-порта функцией PurgeComm(hPort, PURGE_TXCLEAR or PURGE_RXCLEAR) иногда, но не всегда, (примерно каждый 30-й раз) начинает считываться непонятный мусор?
Имитировать нажатие клавиш в неактивном окне
Здрасте:) У меня есть моя программа и есть программа другая. Другая программа завершает свою работу по нажатию в ней CTRL+Z (имеет консольный интерфейс). Мне же нужно, из моего GUI имитировать...
Hook, изменение окна
У меня есть программа, которая создаёт окно, caption которого 'Form1'. Используя хуки, мне нужно изменить это окно до того, как это окно появится (например, сделать так, что окно появится скрытым)....
Всплывающее окно при наведении курсора
Как реализовать, чтобы при наведении курсора на иконку в трее всплывало окно с какой-либо информацией?
Добавлено через 15 минут
Как реализовать, чтобы при наведении курсора на иконку в трее...
Разработка win программы без визуального редактора (средствами API)
Нужно сделать программу без визуального редактора, так-то она сделана (не по заданию сделана, через визуальный редактор borland delphi), но нужно именно кодом (создавать формы, задавать им свойства,...
Голосовой поиск google
Здравствуйте! Хотел узнать каким способом можно использовать голосовой поиск от google программным методом?
Меня интересует распознавание слов.
Какие мысли у вас по этому поводу?
WinAPI функции
Суть программы:
Есть две программы "Клиент" и "Сервер" Клиент посылает сообщение серверу с помощью PostMessage, при получении сообщения "Сервер" выполняет некую ф-цию (ищет директорию Windows), и...
2 окна с одним классом ComboBox на одном окне, FindWindow
Необходимо вставить текст в ComboBox стороннего окна.
Возникла проблема в поиске ComboBox в окне сторонней программы.
В окне находится 2 ComboBox.
1. Class:ComboBox, Caption: нет
2....
Создание потоков
Нужно написать программу, которая порождает 2 потока. Один записывает информацию в именованный канал, а второй читает её оттуда.
Вроде что-то написал, но не получается запустить потоки :(. И вот что...
Проблема с ловушкой WH_CALLWNDPROCRET
вот есть ловушка в она должна записывать все окна которые активировались в файл.
но при ее роботе выскакивает целая куча ошибок в других программах вот пример кода этой ловушки
Library Hook;...
Запрет на изменение папки
Подскажите, каким образом можно реализовать запрет доступа на любое изменение, открытие, чтение какой-либо папки и всех файлов внутри её посредством winapi в delphi 7, OC Windows.
Требуется так,...
Определить имя пользователя и домен (remote app)
Приложение на сервере, расшарено на всех через remote app.
Необходимо получить имя пользователя и домен именно пользователя инициирующего запуск приложения в терминальной сессии, а не данные с...
Имитация нажатия кнопки клавиатуры в другом приложении
Здравствуйте. В инете нашел только как кнопку нажимать,а мне нужно:например в игре управление w,a,s,d-нужно по нажатию кнопки в моем проекте-передавалось нажатие w так, будто бы я нажал кнопку на...
GetGlyphIndices - странности в работе функции
Здравствуйте!
Насколько я понимаю, функция GetGlyphIndices существует, в частности, для того, чтобы определять, имеется ли определенный глиф в составе шрифта. Я вызываю ее со следующими...
CopyFile - Не копирует файлы
var
v:string;
begin
if opendialog1.Execute then
begin
CopyFile(PChar(opendialog1.files),PChar(v),false);
end;
Вот такой код, компилируется но не работает
Ответа не нашёл.
Прочитать 8 байт из файла
Прочитать 8 байт из файла , начиная с байта 5, и вывести их на экран.
Пишу :
procedure TForm1.N2241Click(Sender: TObject);
var buffer:string;
myfile:cardinal;
count:integer;
begin...
Notepad++, Scintilla, SendMessages и Delphi
Получаю handle скинтиллы через FindWindow и FindWindowEx.
Пытаюсь передать строку для замены так:
str:='qwerty'#0;
sendmessage(hwndScintilla,2170,0, lparam(pchar(str)) );
2170 - это...
Delphi + Таблица в документе Word - ошибка при форматировании заголовка
Программа создает при помощи объекта WordDocument документ Word, который содержит большое количество разнообразной текстовой и графической информации, а также таблицы. Одна из таблиц довольно велика...
Работа с sendmessage
Доброго времени суток!
У меня такой вопрос:
Отправляю в другое окно (в игру) сообщения нажатия мыши.
Вырезка для примера:
sendmessage(H,WM_RBUTTONDOWN,0,0);
Sleep(15);...
ListView дочернего окна
Здравствуйте, уважаемые программисты!
Суть проблемы такая:
Есть дочернее окно чужой программы, в котором находятся Edit и ListView (а точнее SysListView32), мне нужно получить текст с этих двух...
Считывание MBR жесткого диска
Почитал тут одну статью http://www.realcoding.net/article/view/4241
Ради эксперимента решил написать прогу, которая считывает MBR и таблицы разделов. Однако, почему то функция ReadFile ничего не...
Ошибка ShellExecute: Параметр задан неверно
Доброго времени суток!
Сделал на Делфи AutoRun (автозагрузчик для дисков) . Доступ к папкам и экзешникам на диске осуществляется через ShellExecute:
ShellExecute(handle, 'open', 'Документация',...
Получение информации о драйверах
Здравствуйте. Помогите пожалуйста с курсовой работой.
Задание. Разработать многопоточное приложение, выполняющее следующие операции: 1) Просмотр в памяти загруженных драйверов и вывод информации о...
Утечка памяти BitBlt
Написал такую вот функцию для скриншота экрана:
function ScreenshotDesktop32:TBitmap;
var DTW:HWND; hDDC:HDC;
begin
DTW:=GetDesktopWindow;
hDDC:=GetDC(DTW);
Result:=TBitmap.Create;...
VirtualProtect
Привет всем. Не могу получить доступ к User32.dll.
procedure TForm1.Button1Click(Sender: TObject);
var
d1,d:dword;
buf1:dword;
addr:Pointer;
han:HWND;
begin
han:=...
Найти приложение и убить процесс (Delphi)
Есть программа, написанная на Delphi. Окон у нее нет, поэтому через FindWindow ее не найти. Зато она оставляет Mutex (делал для запрета запуска 2х копий). Сейчас появилась необходимость обновлять эту...
Как менять настройки монитора программно?
Многоэкранный монитор (2 штуки), надо поменять эту настройку:
Отслеживание ShellExecute, WinExec
Привет всем!
Хотел бы задать небольшой вопрос, т.к. решения в гугле не нашёл.
Что мне нужно: 1) Отследить ShellExecute или WinExec с помощью хука. 2) Понять, какая программа запустила с помощью...
Запуск Internet Explorer от имени другого пользователя
Необходимо запустить IE от имени другого пользователя. Вроде бы ничего сложного:
program Project1;
uses windows;
function CreateProcessWithLogonW(user:pwidechar; domain:pwidechar;...
Как вызвать функцию DLL, внедрённой (Inject) в чужой процесс
Добрый день.
Подскажите мне глупому и неразумному, как вызвать свою функцию в чужом адресном пространстве?
Поясню.
Есть некая программка, именуемая RunAsDate
Она умеет цеплять свою DLL к...
Разработать два оконных приложения обменивающихся сообщениями
Разработать два оконных приложения обменивающихся сообщениями. Выполнить получение информации по указанному диску и получить результат выполнения команды. Для обмена сообщениями использовать...
Выход из winapi приложения
Доброго времени суток, подскажите пожалуйста, какой командой можно закрыть приложение не имеющее формы. Изначально пробывал exit; и application.terminate; но не помогло.
Вывод из консоли в memo
Как вывести текст из консоли в memo? Т.е. у меня с формы по нажатию кнопки запускается консольное приложение, а я не знаю как вывести оттуда текст в memo.
Добавлено через 55 секунд
Вот консольное...
ScrollBar
Добрый вечер!
Подскажите пожалуйста:)
Имеется три скроллбара
hScrollBar:=CreateWindow('scrollbar',
nil,
ws_visible or ws_child or ws_tabstop,
...
И опять. Hooks
Доброе время суток, товарищи.
Пытаюсь поймать WM_USER + 31845...
Соответственно - SetWindowsHookEx с параметрами и WH_CALLWNDPROC и WL_GETMESSAGE и что только не пробовал... Без условия - ловлю все...
Как переделать форму в консольное приложение и получать параметры запуска
Ребята, очень нужна Ваша помощь!
У меня есть ооочень большой проект на Делфи 10. В нём куча разных форм.
Стоит задача: использовав "ядро" программы сделать "переключатель".
Т.е. если я...
Как закрыть стороннюю программу программно?
Такая тема, есть программа которая открывает по нажатию кнопки презентацию (1.pptx) и есть 2 кнопка (закрыть) ну и нужно чтобы по нажатию кнопки процесс PowerPoint крякался или сама презентация...
Получить handle элемента
Доброе время суток
я уже всю голову себе сломал
как получить handle эмелента на форме есть компонент Chromium
Edit1.text:=InTTostr(Chromium.Handle);
так он получает хандл но если посмотреть...
Запись в реестр
Ни как не создаётся параметр сключом в windows 8.1 в 7 было всё впорядке.
HKEY_LOCAL_MACHINE не прописывается а в ветке HKEY_CURRENT_USER всё нормально.
Registry := Tregistry.Create;...
При установке хука на клавиатуру хендл всегда равен 0
function Key_Hook(Code: integer; wParam: word;
lParam: Longint): Longint; stdcall; export;
begin
ShowMessage('312312341241');
end;
exports Key_Hook;
begin
H := application.Handle;...
Запуск приложения через CreateProcess и ожидание его завершения
В общем, суть в следующем: нужно, чтобы программа запускала консольное приложение DD под windows, передавала ему необходимые параметры, и после завершения его работы отправляла сообщение...
SetParent и перемещение окна
Delphi xe 10
На форме лежит кнопка, которая запускает калькулятор и устанавливает ему Родителя наше приложение
При перемещении калькулятора по форме - окно калькулятора не прорисовывает на рисунке...
Как в редакторе tlb (COM) указать тип параметра "HBITMAP *p"
...если его нет в списке. Как вообще задаются кастомные типы? Вот, например, IThumbnailProvider::GetThumbnail, который я хочу реализовать:
HRESULT GetThumbnail(
UINT cx,
HBITMAP ...
Выполнение консольной команды
Мне нужно выполнить команду и вставить туда значение переменных точнее выполнить консольую команду со значением переменных
WinExec(pAnsiChar('cmd /c netsh wlan set hostednetwork mode=allow...
Основные параметры загруженности компьютера (С++ -> Делфи)
#include <iostream>
#include <Windows.h>
#include <Psapi.h>
__int64 FILETIMEToInt64(FILETIME filetime){
__int64 curTime;
curTime = filetime.dwHighDateTime;
curTime <<= 32;
curTime +=...
Имитация нажатий кнопок
В общем ребят, есть проблема, все наверное знают игрушку World of Tanks(столько рекламы) в общем при определенном
событии должна нажиматься кнопка, но конкретно в Танках(в других окнах работает)...
WriteFile как передать HEX
Приветствую!
Есть у меня протокол общения с некоторой железкой, подключенной к COM порту. Данные надо передавать в HEX формате. Как мне передать строку вида 02 01 02 02 02 02 02 02 02 A9 67, вернее...
Вывести на экран список окон верхнего уровня (с указанием родительского процесса)
Вывести на экран список окон верхнего уровня и у каждого окна указать какому процессу оно принадлежит.
Эмуляция нажатия клавиши без использования WinAPI
Есть приложение, эмуляция нажатия клавиш клавиатуры и мыши в которое блокируется на уровне WinAPI.
Подскажите, как отправить в него нажатие клавиши, не используя WinAPI?
Может быть, есть...
Закрыть мой компьютер
Программно пытаюсь при открытие закрывать мой компьютер ,но не работает на windows 7
и на xp
tit:=FindWindow(nil, 'Компьютер');
if (tit>0)and(second_hide='true') then
PostMessage(tit, WM_QUIT,...
Перерисовка рабочего стола
Доброго времени суток.
Рисую на рабочем столе (точнее на обоях) простую линию, рисуется она замечательно, а как ее теперь стереть?
var
Desktop:HWND;
Canvas:TCanvas;
begin
Desktop :=...
SetEvent + WaitForSingleObject
Есть ли гарантия, что WaitForSingleObject успеет сработать, если другой поток сделает SetEvent и CloseHandle подряд?
Добавлено через 37 минут
И ещё вопрос: каких значений не бывает у хэндла...
SendMessage и PostMessage
Отправляю другой программе данные после работы, отправляю строкой. Хотел бы понять почему PostMessage не работает в то время как SendMessage отправляет данные. Мне не нужно возвращать результат после...
Как получить текущую раскладку клавиатуры для чужого активного окна?
Что нужно передавать в GetKeyboardLayout для того, чтобы получить раскладку активного чужого окна, а не моей программы?
Знаю, что ProcessId, но как получить ProcessId активного окна? С помощью...
Лабиринт на прохождение
Здравствуйте! Поручили задание сделать лабиринт, который нарисован у меня на бумаге(можно и по другому), и сделать еще несколько уровней с лабиринтом. Так вот тут я и встрял, можно сказать сразу...
Доступ к компонентам формы из потока
Добрый вечер, уважаемые знатоки
Ознакамливаюсь с средствами Делфи в области многопоточности + с файлами, проецируемыми в память
Задача: оформить в отдельный поток простенькую программку по переносу...
Как определить точный размер оперативной памяти?
Приветствую.
Есть функция:
function GetMem: String;
var
MyMem: TMemoryStatus;
begin
MyMem.dwLength:=SizeOf(MyMem);
GlobalMemoryStatus(MyMem);
with MyMem do begin
Result:=...
Запуск из программы с админскими привилегиями внешней программы без прав админа
Нужно в программе которая запущенна под амином запустить другую программу без прав админа.
Сканер сигнатур для Delphi
Сканер сигнатур написанный мною aka ArxLex специально для участников сайта Cheaton.ru. Материал чисто для ознакомительных целей. В качестве основы и принципа работы были взяты функции с C++. Пример...
Изменение метки диска
Помогите пожалуйста , нужно изменить метку диска пишу :
var result:boolean;
INP, Lab_disk : string;
begin
INP:='C:\';
Lab_disk:='METKA';
result:=SetVolumeLabel(PChar(INP), PChar(Lab_disk) ;...
DLL экспорт строк
известно что dll может работать со строками только ввиде PAnsiChar и PWideChar
Данные типы достаточно легко трансформируются в Delphi String если бы не одно НО. Их нужно гдето уничтожать, ибо...
Отловить открытие определенной папки
Здравствуйте, помогите пожалуйста с решением проблемы:
Необходимо при открытии определенной папки(двойной клик по папке в explorer) вывести сообщение "Вы открыли папку" в моем приложении.
Перерыл...
ShellExecute: задержка выполнения программы до отработки внешней программы
Вообщем, нужно запустить на исполнение gbak, приостановить программу на период его исполнения, и дождавшись окончания процесса продолжить.
Запускаю так:
. . .
strPackPath :=...
Получить время входа в систему пользователя
Есть такая функция, но выдаёт время на годы вперёд, что не так?
function VremaVxoda:string;
type
TUSER_INFO_3 = record
usri3_name:PWideChar;
...
SendMessage и WinApi
Доброго дня комрады! написал программку в делфи которая через n количество дней удаляет ключ реестра, останавливает пару служб, и !должна запустить указанный ранее инсталлер, нажать кнопку далее,...
Как быстро копировать память без всяких циклов
в CopyMemory цикл есть.
Как определить имя компьютера и IP адрес подключенного через RDP?
Нашел такой пример
WTS = Новый COMОбъект("WTSManager.Shell")
Сообщить "My computer name: " + WTS.MyClientName + " " + "My IP address: " + WTS.MyIPAddress
Сессия = "Total sessions: " &...
SDIParentForm.Focus как в MDIParentForm
Добрый день,
Вопрос чисто про WinAPI, но т.к. отдельного форума для него больше нет, пишу тут.
Дело в том, что компилятор в котором я работаю не имеет MDI. Сама концепция MDI, на сколько я...
Отказано в доступе к сервису
Добрый день. Ранее для определенных задач был написан собственный сервис (наследник от TService). Все было хорошо сервис без проблем работал в WinXP, но встала задача запустить его на Windows Server...
Работа с драйверами
Очень прошу помощи, так как с драйверами столкнулась впервые.
Задание:
Программа должна выполнять следующие функции:
Выводить на стандартное устройство вывода или в файл таблицу, содержащую...
WinApi, integer to string
Всем привет и хорошего настроения...
не подскажете, есть ли функция по переводу из интегера в стринг используя только модуль windows? асм вставки может какие?
спасибо)
Delphi и ZipMaster. Ошибки
Делаю всё правильно, вроде бы, но при компиляции вылетают непонятные ошибки. Значит, я делаю что-то не правильно. Не понимаю, что это за ошибки, нуждаюсь в помощи. Прилагаю скрин.
Не могу понять почему не работает
Здравствуйте. Взял с интернета код для определения ip адреса компьютера с помощью wmi, немного адаптировал. Но он не работает. Пытался скомпилировать выдает ошибку: cannot debug project unless a host...
Работа с FindWindow и PostMessage: как надежно передавать данные между программами?
Добрый день!
Осваиваю передачу сообщений между приложениями с использованием FindWindow и PostMessage.
Из одной программы с помощью PostMessage передаю сообщение другой программе следующим образом:...
При чтении cbInQue из структуры COMSTAT Ошибка Access violation
Пытаюсь определить сколько байт пришло на ком порт и вываливается Access Violation. В остальном проблем нет, порт открывается, в него данные пишутся, принимаются. Но что бы верно принимать данные,...
На сколько актуально изучать WinAPI на примерах по Windows 7 во времена Windows 10?
На сколько актуально изучать WinAPI на примерах по Window7, во времена window10?
Сильноли изменолсь апи за эти годы?
Диспетчер задач Windows 10
Я пытаюсь написать свой аналог диспетчера задач из Windows 10. Мне нужна помощь. Мне нужен код, благодаря которому выводится информация о процессоре и ОЗУ, как на картинке. Исходник тут.
WinAPI окна
var h: HWND;
begin
h:=FindWindow('DOS',nil);
end;
Допкстим у меня в переменной h содержится идентификатор некого хэдла программы.
На форме данной программы есть 5 кнопок, и 3 текстовых...
AlphaBlend
Пытаюсь вывести полупрозрачный прямоугольник, не выходит. Укажите пожалуйста на ошибку или поделитесь примером
procedure BlendRectangle(Canvas:TCanvas;R:TRect;C:TColor;MixPercent:Byte);
Var
...
зависимость WM_CHAR и активной раскладки отправителя
Нужно было отправлять сообщения WM_CHAR стандартному виндусовскому окну для эмуляции нажатий клавиш.
С латиницей все элементарно:
sendmessage( w, wm_char, ord(h), 0);
Русские буквы не работали....
Доступ к MainMenu и PageControl другого приложения
Здраствуйте!
Есть задача управления сторонней программой, кторая также написана на делфи. Столкнулся с двумя трудностями:
1. Доступ к главному меню (TMainMenu). В программе Spy++ не нашёл...
PostMessage. Найти ошибку в синтаксисе или алгоритме
Да-да, знаю, уже миллион раз на форему поднимался вопрос и про дескрипторы, и про PostMeassage, и даже про имитацию нажатий мышью без использования курсора. Но я, вроде как, все эти знания уже...
GetNativeSystemInfo параметры
Сказали что с помощью GetNativeSystemInfo можна определить битность системы . но что-то у меня не получается это сделать:
var
bit: integer;
begin
GetNativeSystemInfo(bit);
Определить стиль Windows
Доброго времени суток.
Подскажите пожалуйста, как определить, что Win7 использует классический стиль и наоборот?
Возможно что то связанное с темами
Нашел вот такой пример, но он не не работает(...
Jump List Windows 7
Здравствуйте! Помогите разобраться в проблеме:
Необходимо реализовать Jump List на Delphi, я нашел пример, но он работает только при запущенном приложении(появляется вторая иконка на панели задач),...
Собирание программно информации о железе компа
Здравствуйте господа. Нужна информация, возможно ли в винде 7 и выше.. выудить информацию о БИОС (версия и т.д) память (его заводской номер или что то вроде номера) все о процессоре. Нужна инфа об...
Отслеживание появления звука в основном звуковом канале
Пока нашел только как изменить максимальный уровень звука, но это не то. Нужен звук в текущий момент. Есть он или нет.
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants,...
GetExitCodeProcess и TerminateProcess в программе
Честно говоря стыдно в эту тему WinApi пихать свою проблему, когда есть "Delphi для начинающих"!
Программа написана на Delphi Borland 7!
По форуму искал и конкретно "данное сочетание заголовков"...
Вызвать стандартное окно аутентификации Windows
Доброго времени суток, уважаемые коллеги.
Написал модуль для добавления собственных заданий в стандартный планировщик задач Windows (иcпользуя Scheduler API). В процессе работы необходимо...
Создание папки .WinAPI
Есть переменная типа string ,в которой указывается путь ,нужно создать каталог по этому пути с помощью системной функции Win32API CreateDirectory, пишу вот так :path:='D:\rab' ;...
Как заблокировать папку на время пока с ней работает программа?
Добрый вечер!
Как с помощью Win32 API-функций заблокировать папку на время, пока с ней работает программа?
Например, программа просматривает файлы в папке. Или программа удаляет папку.
Как...
Перевод функций C++ на Delphi (dhnetsdk.h)
Имеется библиотека взаимодействия с видерегистраторами Dahua - Network SDK
в ней есть заголовочный файл dhnetsdk.h, для пары функций не получается организовать вызов в Delphi 7.
Или ошибка памяти,...
Как правильно работать с CreateProcess?
Здравствуйте, столкнулся с такой проблемой.
Есть приложение для работы с базой данных. В базе хранятся файлы. По нажатии на кнопку происходит открытие файла в отдельном протоке по средством...
Эмуляция нажатия кнопок
Хочу сделать l2mult, это программа которая в свернутое окно шлет нажатие клавишь.
Тот кто сталкивался, или может хоть немного намекнуть в чем проблема. Очень надеюсь на вашу помощь. Потому что свои...
Как сделать активной кнопку сворачивания приложения (используя SetWindowLong)?
У приложения не активна кнопка сворачивания окна, нужно сделать ее обратно активной.
говорят, что с помощью SetWindowLong можно поменять стиль, но я немного нуб в winapi, примеров кода не нашел...
WinAPI \ Ирархии окон \ Клик по "чужой" кнопке
Здравствуйте столкнулся с проблемой клика кнопки в "чужом" окне.
Через winspy++. Главное окно "Windows" - дочернее окно #32770 "" - Button "Buy".
Нужно добраться до кнопки "Buy" и нажать.
...
Как работает сниффер
Как работает сниффер.
Обычно для работы с COM- портом используется API-функция CreateFile, которая позволяет получить монопольный доступ к порту. Однако, есть замечательные программы-снифферы,...
Получить путь исполняемого файла по идентификатору
Добрый день.
Есть ли возможность получить полный путь к .exe файлу зная Id процесса.
Я делаю следующее
hndl := FindWindow(PChar('TApplication') , PChar('Visu')); ...
Управление другим приложением из своего
Всем привет. Есть такая задумка. Имеем приложение PuTTY для SSH соединений, далее необходима прога при нажатии в которой на кнопку в поле адрес в программе PUTTY пропишется ip(к примеру 192.168.1.1)...
Массив String и OleVariant
Добрый день.
Пытаюсь достучаться до автокада, а именно к методам SetXData и GetXData
function SetXDataStr(acEnt :IAcadObject; EntryType: string; DataXStr: String):boolean;
var
varDatGrp :...
Узнать WHnd по запущенному exe файлу, зная только имя файла prog.exe
В общем сабж. Само название окна может иметь различные имена так уже FindWindow не вариант.
Нужно именно запускаю программу prog.exe спарсить с процессов и получить ее главный хендл.
Как в x64 системе обойти редиректинг в реестре? Что за API-функция RegDisableReflectionKey?
Есть такая функция - RegDisableReflectionKey. В Что нужно подключить в uses, чтобы ею воспользоваться? Windows уже подключен.
Но у меня Delphi 2007, возможно проблема в этом
Индикатор активности HDD
Здравствуйте.
Стоит задача сделать программный индикатор активности HDD. Как это сделано в программе HDD Led. То есть нужно отслеживать обращение к любому диску в системе. Кто-то может подсказать,...
Отправить файл (Drag&Drop) в чужое приложение
Доброго всем времени.
Пытался нагуглилить данный вопрос, но что-то пошло не так...
Задача такая: брать определённые файлы и эмулировать перетаскивание их на окно чужого приложения (послать...
Вывод на печать в Microsoft Office Document Image Writer
Итак, по заголовку понятно с чем я мучаюсь. Задача такая, есть исходные файлы различных форматов, типа pdf, cad, doc, xls и т.д., и нужно получить tif этих файлов. Вручную MODIW ( Microsoft Office...
Вывод картинки на DC окна затирает элементы управления
Здравствуйте!
Начал разбираться, как делать приложения, используя только WinAPI и столкнулся с неожиданной проблемой. Создаю окно:
MainWnd := CreateWindowEx(WS_EX_APPWINDOW, szAppName, 'Test...
Как отправить файл на сервер через FTP не зная имени а зная только расширение файла?
Доброго времени суток! Очень нужна ваша помощь форумчане.. Пытаюсь отправить файл через FTP на сервер.
Суть такая - имя файла который будет отправятся каждый раз разное.. известно только расширение...
WINAPI цвет строк в edit
пишу программу используя winapi, в ней создается форма, а на ней объект memo:
Memo1 := CreateWindowEx(WS_EX_CLIENTEDGE, 'edit', nil, WS_CHILD or WS_VISIBLE or WS_VSCROLL or WS_HSCROLL or...
Не работает заморозка процесса
Есть код для заморозки процесса:
function OpenThread (dwDesiredAccess : DWORD; bInheritHandle : BOOL; dwThreadId : DWORD) : THandle; stdcall; external 'kernel32.dll';
const
THREAD_SUSPEND_RESUME...
Delphi. Вывод текста в консоль (приложение не консольное)
Есть такая задача: вывести текст в консоль по нажатию кнопки. То есть на пк открыта консоль, я нажимаю кнопку в своем приложении, а в консоли выводится текст. Я понял, что сначала надо найти хэндл...
Извлечение ресурсов на WinApi
Добрый день! Требуется помощь. Пытаюсь извлечь из ресурсов три файла. Компиляция проходит успешно. При запуске программы - файлы не извлекаются в нужную папку по директории C:\
За помощь заранее...
Сделать несворачивающееся окно (по Win+D) [not topmost]
Есть ветка "C++ и WinAPI", есть ветка "Delphi и WinAPI". Общей ветки WinAPI чего-то нету. Решил написать тут. Можно продублировать во вторую, нет?
Ситуация такая: делаю окно, оно НЕ topmost, и оно...
Hook мыши на PopupMenu
Доброго времени!
Есть тыщщщи PopupMenu. Задача: посчитать кол-во нажатий каждой кнопки дабы выявить ненужные.
Искать код попапов по всему проекту и вставлять туда свой код - не вариант.
Идея...
Библиотека DDEML
Добрый день.
Мне нужно организовать обмен данными между приложениями по протоколу DDE с помощью библиотеки DDEML.
Пытаюсь экспортировать функции:
//Статическая загрузка DDEML.DLL
const...
IPersistFile.Save неправильно сохраняет
Пытаюсь создать ярлык на рабочем столе. У меня в системе поменян путь рабочего стола на "d:\_300GB\Desktop" но IPersistFile.Save почему-то упорно продолжает пихать ярлык на "c:\Users\Admin\Desktop"....
Как отобразить справку при нажатии клавиши?
вот я использовал такой код при вызове справки из контекстного меню
ShellExecute(Handle, 'open', '\Курсовая\Help.chm',nil, nil, SW_SHOW);
и в uses прописал ShellApi а как сделать чтобы при нажатии...
Создать таймер (WinAPI) так, чтобы он сам себя уничтожил
Нужно создать таймер так чтобы он сам себя уничтожил.
основная програма:
var Timer:WODR;
begin
Timer := SetTimer(0, 0, 15 * 1000, @work);
end;
Отслеживание посещений сайтов средствами WinAPI.
Привет всем!
Пишу программу и тут у меня возник вопрос.
Как из программы можно отследить момент запроса на открытие страницы браузером и адрес самой открываемой страницы? Браузер ориентировочно IE,...
Обои рабочего стола
Смена обоев приводит к просто черному рабочему столу. где то ошибка?
procedure TForm1.Button12Click(Sender: TObject);
var path: string;
begin
opendialog1.Execute;
path:=opendialog1.filename;...
GetDC и BeginPaint
Добрый день. При написании программы на winapi по-умолчанию всегда пользовался BeginPaint и проблем не знал, но преподаватель озадачил: если вместо BeginPaint и EndPaint использовать соответственно...
Открытие папки
Изучаю WinApi ,подскажите пожалуйста ,как открыть файл с помощью функции OpenFile ,и вывести на экран ,вот ,что написал ,но не работает :
// переменные
var buff,put:string;
FFile:Cardinal;...
Использование OLE в отдельном потоке
Здравствуйте! Уже третий день бьюсь над задачей: необходимо по нажатии одной из трёх кнопок создать поток, который заблокирует кнопки, создаст ole-объект, поработает с ним и уничтожит и объект и...
Права доступа к ивенту
Всем привет!
Хочу создать event в сервисе (т.е. из-под пользователя SYSTEM) и открыть его для установки (SetEvent) в юзере/администраторе.
Как это можно сделать? Разумеется, если создать event в...
Как запустить программу с флешки аутораном
Я хочу написать программу чтоб эта программа начала работать при подключении к компютеру
ПРограмма расположена на флешке и должна она запустится из флешки Зарание спасипо
+ и чтоб антивирус...
Добавить на окно WinAPI Delphi менюшку
Вот моя прога
program WinApiWindows;
uses
Windows,
Messages;
Const
ButtonID = 100; // Это идентификатор кнопки, используется для определения исходящих от неё событий, число -...
Беда с stringtowidechar и ShellExecute
народ, подскажите кто знает.
нарыл такую вещь как ShellExecute. ею открываю файл, чтоб само открылось нужное приложение. вид функции function ShellExecute(hWnd: HWnd; Operation, FileName,...
Нарисовать меню (типа "Пуск") средствами WinAPI
Задача такая.
Надо нарисовать меню средствами Delphi или WinAPI. Выглядеть оно должно также как и меню, которое выпадает при нажатии кнопки 'Пуск' в Windows. То есть какая-нибудь картинка слева...
Работа с Handle в Delphi 7
Добрый день!
Работаю с ручным сканером, создаю для него handle при открытии формы FormActivete(Sender: TObject); , а при закрытии формы FormClose(Sender: TObject; var Action: TCloseAction);закрываю...
Для чего реально может применяться функция LoWord
Привет всем, подскажите пожалуйста, для чего реально может применяться функция
function LoWord(AnInteger: Longint): Word;
Которая, выделяет из 32-битового целочисленного значения младшее слово. В...
F1book delphi 7 в windows 7 access violation in module 'oc30.dll' при попытке записи
Может кто нибудь сталкивался с такой проблемой.
Компонент F1book delphi 7 в windows 7 выдаёт access violation in module 'oc30.dll' при попытке записи после вызова Formula One WorkBook Designer...
ListBox + ComboBox
В общем, начну с того, что я вообще не разбираюсь в Win API, у меня одна лабораторная по него в университете и дальше мы перейдем на что-то другое. Однако, литературы достойной я почему-то не могу...
Как нажать кнопку в чужом окне?
Добрый вечер! Помогите пожалуйста нажать на кнопку в чужом окне. Добрался до компонента (нашел его handle) но не нашел никакой инфы о классе этого компонента. Есть подозрение, что это...
Код из AIMP2
Я сделал декомпиляцию AIMP2. Однако Delphi криво видит исходник. Нужна помощь в доработке кода.
Я сделал, потому что разработчики AIMP отказываются портировать на Linux и я решил сделать аналог...
Получение THandle собственного сервиса
Всем доброго времени суток.
Задача:
Мой сервис запускает процесс. В качестве передающегося аргумента параметра командной строки необходимо передать хендл текущего процесса (сервиса), для того...
Переключение входов монитора
Ситуация. Я имею на работе два ПК и один монитор. Зачем - не спрашивайте. Один Пк подключен через цифровой вход, второй через аналоговый. Каждый раз при подходе посторонних мне приходится переключать...
winapi буфер обмена
Задача: послать стороннему приложению, (в данном случае игра на directx) в окно ввода, комбинацию клавиш ctrl + v, перед этим скопировав в буфер обмена какой нибудь текст. При этом приложение...
Что использовать вместо GetWindowRect для максимизированных окон?
Есть функция (многие из читающих этот раздел наверняка с ней знакомы) GetWindowRect, она возвращает прямоугольник-координаты окна, учитывая также и границы окон, как на аттаче:
Но при...
Создать приложение, определяющее классы и хендлы текущих окон
Подходящего ничего не нашёл, если кто знает, подскажите ПЛС?
Запретить создание иконок в трее конкретной программе
Подскажите, пожалуйста, как предотвратить появление иконок в трее? После удаления иконки, некоторые приложения проверяют ее наличие, и если ее нет, они ее пересоздают. Есть мысль, что надо ставить...
Дилемма с FileMapping
Добрый день,
ТЗ: Измерить скорости чтения блоков данных из ОЗУ
Я решил реализовывать это через проецируемый в память файл. То есть пользователь указывает кол-во элементов для записи в файл....
Кнопка с картинкой на WinApi
Исходник программы, показывающей пример создания стандартной системной кнопки с картинкой. Поддерживаются темы оформления для отрисовки. Исправил и усовершенствовал тот вариант который был в...
Оболочка для CarPc
Всем доброго времени.
Пишу оболочку для компьютера в авто и столкнулся с парой проблем.
1. При открытии чужого приложения, не могу отловить Handle запускаемого приложения чтобы сделать его...
Управление ADB, как дочерним пороцессом, при *** winAPI
Пытаюсь написать свой отладчик для android. Просто интересно, работает же, как-то, AndroidStudio, через adb.
Создал, при помощи CreatePipe, три канала stdin, stdout, stderr. Запустил adb.exe, при...
Определение типа файла
Здравствуйте, товарищи программисты. Подскажите пожалуйста, как с помощью в WinApi функций определять тип файла. Пишу файловый менеджер, в ListView отображаю файлы и папки, нужно как то определять...
Имитация нажатия кнопки мыши при нажании клавиши ESC
Как написать маленькую программку на Delphi которая выполняясь в фоновом режиме делала следующее: чтобы при нажатии клавиши ESC генерировалось нажатие левой клавиши мыши на кнопке (проигрывателя...
Запуск процедуры из библиотеки от другой учетной записи
Всем привет, хорошего дня и отличного настроения =)
вероятно сморожу сейчас что-то ужасное, но опишу вводные данные: есть программулина на c#, есть библиотека на Delphi (lazarus), в библиотеке...
Подскажите с ReadFile и COM портом
Здравствуйте, помогите новичку, пожалуйста.
Я делаю термодатчик на МК, и он должен связываться с ПК по COM порту. Решил использовать API т.к. с библиотекой вышли еще большие грабли.
Когда...
Программа на WINAPI
У меня есть такая задача, нужно сделать программу на котором будет распологаться кнопка "TButton" и компонент "TServerSocket", в обр. соб. "onClick"begin
ServerSocket.Active:=true;
end;
Вся...
Узнать имя устройства
Как узнать имя устройства подключенного к определенному порту? Например к COM3 или LPT1
Примеры работы Delphi с WinAPI
Здрасти товарищи программисты и т.д.
Дайте пожалуйста простые примеры работы с Winapi в Delphi (желательно простые, для начинающих).
такие как узнать хар-ку пк или хар-ку ОС.:):):)
CMD от имени админа
Мужики, есть код для открытия файла от имени другого юзера (в моем случае администратора). Работает на ура, но! как в УЖЕ открытой консоли выполнить команду? Например: net user noob password
...
Механизм TTM_ADDTOOL не работает в API-версии
Пишу прогу на WinAPI, всё уже почти готово, а вот хинты не получается сделать :( Там есть стандартный механизм TTM_ADDTOOL, но он не работает в API-версии (при использовании VCL всё ОК). Никто не...
Доступ к элементам управления другого приложения. Часть 2
Здраствуйте!
Управляю программой на Delphi, не могу понять одну вещь. На форме приложения есть несколько edit'ов с одинаковыми значениями, названия классов, естествено, тоже одинаковые:
Мне...
Rad Studio подключение Win32APi
Здравствуйте ,подскажите как подключить Win32API для delphi 10.3 ,просто нужна функция GetSecurityInfo .
Выполнение php скрипта в delphi
Доброго времени суток!
Скачал архив с php интерпертатором, с официального сайта.
Передаю через командную строку имя php скрипта через delphi,
для выполнения, скрипт выполняется. Передаю get...
Передача строки с помощью message TCopyDataStruct другому приложению
как передать строку с помощью messege TCopyDataStruct другому преложению?Подскажите пожалуйста.
Добавлено через 43 секунды
В Delphi
перехват функции в другой программе
Здравствуйте,я уже много времени пытаюсь сделать программку,даже как сказать программку,тест.
Задача такая:
У меня есть программа которая подгружает к себе свои библиотеки,одна из них Engine.dll,...
Нахождение адреса функции в чужой программе
Есть программа-жертва, в ней экспортируемая функция.
function MBSimple(): integer;
begin
result := MessageBox(0, 'asd', ':)', MB_OK);
end;
Нужно написать программу, которая бы вызывала эту...
GDI+ в Delphi XE2
У меня возникла проблема. Написал программу построения графиков с использованием GDI+ (ОС Win8).
И если запускать эту программу на Win7 или XP, то появляется ошибка не найдены файлы ms-api-win-......
DeviceIoControl thread safe или нет?
Сейчас ковыряю interception, это драйфер-фильтр клавиатуры и мыши. В общем там такой прикол. Чтобы через него сэмулировать нажатие клавиши или движение мыши достаточно просто отправить то что надо....
OpenProcess для XP
Здравствуйте! Написал следующий код для нахождения процесса:
Function PId(Exename:string):Dword;
var snap:DWORD;
pe:TprocessEntry32;
begin
result:=0;
...
Нужен доступ к списку процессов в Диспетчере задач и к их параметрам
Как посредствам Delphi можно получить доступ к списку процессов в Диспетчере задач и к их параметрам. Подскажите как? Надо у определенного процесса смотреть число записанных байт и все... Заранее...
Отмена процесса завершения работы Windows
Здравствуйте. Пытаюсь отловить событие завершения работы windows,а после отменить завершение.
procedure WMQueryEndSession (var Msg : TWMQueryEndSession); message WM_QUERYENDSESSION;
procedure...
Добавить пункт в меню панели задач
Всем привет! Можно ли добавить пункт в меню панели задач? И как это сделать (с запуском моего обработчика, естественно)?
Хочу сделать прогу, которая добавит пункт "Приостановить"/"Возобновить"...
COM object/Automation
Всем привет и хорошего настроения,
экспериментирую тут с объектами автоматизации, а именно хочу не длл сделать, а exe, запущен ехе - можно подключиться из другой проги, имея в наличии интерфейсы и...
Зависает приложение при чтении с COM порта
Доброго времени суток.
У меня в потоке все время должен вращаться опрос COM порта - если что-то появилось - она принимается. Ниже приведен код (фрагменты). У меня упорно зависает приложение на...
Захват движения мыши, не курсора
Сделал захват мыши через хук, все хорошо, но что делать, если приложение не дает курсору двигаться, а само реагирует на движение мыши?
Получить код веб-страницы из браузера Google Chrome
Здравствуйте.
Windows 10. Delphi 10.4.
Не знаю, какую WinAPI-функцию использовать, чтобы получить код веб-страницы (HTML, JS, ...) из браузера Google Chrome (то есть, из чужого приложения).
Вот...
Перемещение предмета по экрану WinAPI в Delphi 10
Добрый день! Не подскажите мне, сырнику остывшему, как в delphi реализовать перемещение объекта?
Я на C# любил таким баловаться, для создания интерфейса. Описывалось там, по моей памяти, это просто:...
Работа с bitmap на WinApi
Я знаю, что это не самый удобный способ работы с графикой, но интересно узнать как нарисовать картинку из файла на форме используя только windows.pas и messages.pas
Не могу получить GetPixel от чужого окна
пытаюсь поймать пиксели из DROID4X это эмулятор android на виртуалке
procedure TForm1.Timer3Timer(Sender: TObject);
var
DC: HDC;
Cur: TPoint;
begin
DC := GetDC(hWnd1);
GetCursorPos( Cur );...
Получить текущую скорость интернета
Подскажи как можно отобразить в своем приложении текущую скорость закачки
SSID
Как узнать ssid сети к которому я подключен?
winapi
РЕБЯТА,ПОМОГИТЕ пожалуйста со следующим: в программе нужно прописать коды клавиш(мне для примера достаточно одной) чтобы этот код выводился в файл(т.е чтоб было понятно что за клавиша была нажата)....
Панель информации о жестком диске
Я сейчас программирую на Delphi. Мне нужно сделать аналог панели (которая показана на картинке) на Delphi. Код пожалуйста написать на Delphi.
Изменить скорость курсора сразу
Доброго времени суток.
Делаю замену стандартной настройки мыши в Windows.
Как сделать так, чтоб при изменении позиции в TrackBar`е сразу же менялись параметры мыши, скорость передвижения и...
Postmessage WinApi
Добрый день форумчане.
Вообщем задача такая: Через программу написаную на Delphi открыть программу AnVir Task Manager (1), потом в ней программно нажать на кнопку "Сохранить" (2), далее в выпавшем...
Сворачивание окон
Всем привет, тут такое дело...
В общем мне интересно как бы сделать так чтобы при клике ПКМ(и или через Ctrl+ЛКМ, мне любой пример, а сочетания я уже сделаю) на кнопку свернуть окно сворачивалось в...
Отлавливание нажатия левой кнопки мыши в Edit
Добрый вечер.
Проблема в отлавливании нажатия левой кнопки мыши в Edit. Во всех остальных областях окна сообщение нажатия обрабатывать не надо.
Изначальная задача заключается в перетаскивании сроки...
Ждать, пока работает другая программа
Мне нужно открыть exe-шинк, ждать пока он выполняется, продолжить работу 1-ой программы после закрытия 2-ой программы.
Я знаю, что можно открыть через shellexecute(...), но не знаю как следить за...
Работа со сторонними запущенными приложениями
У WinAPI есть функция которая создает перекрывающее, выпрыгивающее или дочернее окно.
HWND WINAPI CreateWindow(
_In_opt_ LPCTSTR lpClassName,
_In_opt_ LPCTSTR lpWindowName,
_In_ ...
Нажатие комбинаций клавиш по таймеру при неактивном окне
Здравствуйте. Задача следующая: нужно нажимать сочетания клавиш SHIFT+F2 и SHIFT+F3 с равным интервалом. Это нужно для запуска и остановки другой программы (её горячие клавиши). Делаю на таймере...
Защита данных
Подскажите идеи и может реализации, каким образом можно запретить доступ к папке и вложенным файлам, или же просто что бы нельзя было их скопировать, удалить и.т.д. Но при этом нужно подразумевать,...
Нажатие кнопки "В бой" в игре World of Tanks
Узнаю PID формы:
var
window: hwnd;
Begin
window:=FindWindow(nil,'WoT Client');
end;
Естественно пробовал находить PID кнопки по caption-у - результата нет.
Есть ли ещё какие-то варианты,...
Зависает на WriteFile после перехода на x64
Всем доброго времени суток!
После перехода на х64 и соответственно смены IDE с Borland Delphi 2006 на RAD Studio XE3 код, отвечающий за работу по именованному пайпу перестал работать. Вкратце есть...
Пустое окно на WinAPI
Как создать пустое окно на WinAPI???
SysListView32 в чужом Окне Получить Текст (Win7 x64)
Привет
искал в интернете
http://blacksus.narod.ru/articles_1_1_6.html
http://www.delphisources.ru/forum/showthread.php?t=8592
https://www.cyberforum.ru/delphi-winapi/thread1418864.html
нашёл...
обьясните что к чему winapi
исходник найден в интернете. почему окно становится активным, только если программа выполняющая этот код сама активна. если все это поместить в таймер, то пока программа активна, то всё норм, а если...
ToolBar и WinAPI
Создать ToolBar при помощи WinAPI в общем, дело не хитрое. Но все существующие примеры подразумевают использование картинок. Если их не использовать, то текст сдвигается вправо в любом случае. Пока...
Передача параметров в С-процедуру (DLL) из Delphi
Как в программе DELPHI описать параметры и функцию, которая находится в DLL, написанную на языке С, т.е. как сделать вызов внешней функции?
Описание функции в С
short WINAPI matize( const char*...
Выбрать язык интерфейса при первом запуске приложения
Доброго времени суток всем!
Нужно выбрать язык интерфейса (английский или русский) при первом запуске приложения.
По быстрому сделал проверкой установленных в системе раскладок клавиатуры
var...
Как узнать, максимизировано ли окно (стороннее)?
Вроде в структуре WINDOWINFO есть свойство dwStyle, но в него, помимо WS_MAXIMIZE, входят и другие флаги, так что if WinInfo.dwStyle = WS_MAXIMIZE then ... не работает
Добавлено через 50 секунд...
Найти недочерние формы
Моя задача - перечислить все не-дочерние формы, т.е. все открытые на данный момент в компьютере окна (обычно их меньше десяти). Мой код заносит в массив все формы вообще; это получилось сделать через...
Изменение цвета кнопок на WinApi
Пишу программу на winapi под delphi возникла необходимость изменять цвет кнопки по таймеру,кнопки создаются вручную, и ума не приложу как это сделать. Может есть у кого идеи ?
Авторизация в сети Windows
Тут идейка пришла для одного проекта, но такое никогда не делал.
В локальной сети множество компьютеров, все связаны и имеют доступ к чужим учётным записям(естественно имея от них данные). Если ли...
Визуальные эффекты Windows 7
Какой функцией шевелить эти галки, подскажите пожалуйста.
Как узнать какие программы запущены в трее?
Вообще надо узнать какие программы запущены в трее. Нашел эту функцию: "EnumChildWindows", но не могу разобраться какие параметры надо отправлять. Первый это хендл трея(у меня он есть), а вот с...
РАЗРАБОТКА 2D БИБЛИОТЕКИ ДЛЯ КОМПАС
Здравствуйте! Делаю лабораторную работу по САПР, на тему РАЗРАБОТКА 2D БИБЛИОТЕКИ ДЛЯ КОМПАС. Обобщенная цель – «подружить» КОМПАС-3D V12 и Делфи.
Постановка задачи: Создать простейшую 2D...
Отправка сообщений в игру
Доброй ночи. Я уже писал ранее в тему Контролы чужого DirectX Окна. Смог выяснить, что приложение реагирует на движении мыши, даже когда оно не в фокусе. Сообщения которые он получает: WM_NCHITTEST,...
Как в консоль вставить текст из буфера или хотя бы его там написать
Крч есть консоль чужая на моем пк и надо сделать так чтобы по нажатию кнопки на форме моего приложения в строке консоли из буфера прописывался текст и нажимался после этого Enter ,чтобы консоль...
Окно без иконки на панели задач (не ToolWindow, и без родителя)
Собственно интересуют нативные методы скрытия окон с панели задач.
1) я знаю про WS_EX_TOOLWINDOW
2) я знаю трюк с созданием fake-родителя и его скрытием
Не совсем понятно почему присутствует...
Программа, формирующая список всех загруженных модулей и позволяющая определить для каждого модуля процессы
Необходимо сделать программу, которая, формирует список всех загруженных модулей и позволяющая определить для каждого модуля процессы, использующие данный модуль.
есть следующий пример:
Компонент...
Как зафиксировать положение ScrollBox при отключении его ScrollBar?
Всем доброго времени суток! Есть проблема. На форму на которой до этого был только Scrollbar потребовалось добавить listbox (у которого тоже есть полосы прокрутки). Так вот, при открытии формы если...
Службы и приложения
Как правильно организовать работу приложения со службой в системе клиент-сервер. Приложение будет открываться и закрываться, а служба должна работать всегда и выполнять некоторые функции. И служба и...
Отправить сообщение окну из программы-сервиса
Есть обычное оконное приложение, работающее под пользовательской учетной записью, и программа сервис, работающая под системной учеткой. Сервис упорно не видит окно приложения через функцию...
Как по дескриптору окна определить где на диске находится прога?
У меня такой вопрос. Как мне по хендлу(дескриптору) окна определить где на диске находится прога! Например: я запустил DOC файл, и найдя хендл(дескриптор) этого окна, мне нужно узнать откуда запущен...
Delphi получить данные из домена
Всем добрый день!
Помогите никак не могу получить реквизиты пользователя домена.
Есть форма в ней Tedit'ы: Имя Фамилия Организация Телефон
При нажатии tButton1 хотелось бы заполнить эти поля из...
Диагональ второго монитора
Помогите найти диагональ второго монитора. Диагональ основного монитора получаю вот так:
var
DC : HDC;
h,w : Integer;
g : Real;
begin
DC:=GetDC(0);//Получаем HDC активного...
Потоки THread
Здравствуйте. В моей программе наблюдается странной поведение функции Sleep() в потоках THread.
Есть функция:
procedure TThr.Execute;
begin
while not Self.Terminated do
begin
Sleep(1);...
Что за параметры WM_USER, WM_COMMAND, WM_COPYDATA?
Здравствуйте!Можете ли вы подсказать что за параметры WM_USER;WM_COMMAND;WM_COPYDATA?
Многопроцессное приложение
Цель задания
Написать программу, которая реализует поиск заданной последовательности символов в
файле и вывод количества совпадений в другой файл.
Описание задания
Программа должна...
LockFile
Здравствуйте! Увидел в книге api метод LockFile, а рядом с ним описание "Блокирует доступ к файлу с других программ".
А если хочешь разблокировать? Что тогда делать? И покажите что нужно передавать
Uninstall (самоудаление)
Мужики, делаю деинсталлятор и тут трабла. Если запустить Uninstall.exe из папки программы то директория не удалится из-за запущенного экземпляра. Как можно еще удалить Uninstall.exe вместе с папкой,...
Закрытие окна
Добрый день. Возник вопрос, что конкретно происходит при нажатии на "крестик" в окне? Ну т.е. я понимаю что отправляется сообщение WM_CLOSE и разрушается окно, но может кто-нибудь объяснить более...
Баг ProgressBar
Господа, кому-нибудь удалось победить неотключаемый Smooth прогрессбара?
Да, я знаю, что есть костыль, но его действие заметно невооружённым глазом, да и несолидно как-то...
Всё-таки, это...
Завершить процесс программы
Помогите, нужно завершить процесс найденного окна
procedure TForm1.FormCreate(Sender: TObject);
var
Window:hWnd;
buffer: array of char;
begin
Window:=GetWindow(Handle,GW_HWNDFIRST);
while...
Открытие файла функциями WinApi
Всем привет! В чем ошибка, ни одна функция не хочет открывать файл.
if opendialog1.Execute then
handlefile2:=_lopen(pansichar(opendialog1.FileName),of_Read);
// ...
Список пользователей Windows
Мне на Delphi 7 нужно вывести список пользователей Windows (на одном компьютере) как на картинке ниже
Ввод данных в поля чужой программы
Здравствуйте. Имеется программа (Steam) и требуется ввести в его поля (поле логина) свои данные посредством моей программы.
Битый час мучаюсь и ничего не получается.
Ловлю хэндл окна через его...
Джойстик для сенсора
не знаю как привязать свое приложение (урезанная клава) к игре.
Местоположение в Delphi
Здравствуйте, подскажите пожалуйста, можно ли в Delphi узнать своё местоположение, если да, то каким образом, какие функции в этом помогут?
Сложный хук
Доброго времени уважаемые люди) На тему хуков много написано и спрошено, всё перерыл, клава и мышка легко перехватывается, но это всё не то что нужно... перехожу к сути вопроса:
Как, во время...
Отследить удачный запуск программы
Доброго времени суток:
Для запуска программы использую такую процедуру:
procedure RunProgram(cmdStr:string; Wait:Boolean; ShowWindow:Word); ///////////запуск программ
var si:TStartupInfo;
...
Работа с COM портом реальным и виртуальным
Добрый день. Есть программа обмена с устройствами ввода-вывода через преобразователь интерфейса RS485 -> RS232 или RS485 -> USB (с созданием виртуального COM порта).
Проблема следующая: если у...
Поиск файлов
У кого то есть исходник программы который выполняет поиск файлов по компьютеру а после того как файл или папка нашлась она открывает её
Добавлено через 5 часов 21 минуту
Как вообще создать...
Связь системной службы Windows и прикладного приложения
Доброго всем времени суток.
В разработанном ПО на базе Windows XP была реализована связь между прикладным приложением и собственной системной службой Windows посредством использования API-функции...
Можно ли через winsock загрузить в memo1 страницу сайта?
Чего-то не могу разобраться... Если такая возможность есть, покажите на примере, пожалуйста.
Написать приложение, реализующие следующие функции
1. Написать приложение, реализующие следующие функции:
- свободной страничной памяти с выводом результатов на экран с интервалом 3 с;
- резервирование региона задаваемого размера с размещением с...
Как ограничить движение мыши, по вертикали нужной длины?
Как ограничить движение мыши по вертикали нужной длине? Есть программа в ней нужно заблокировать курсор, так чтоб он бегал только по вертикали и с заданной длиной плюс чтобы программа не реагировала...
Движение курсора через WinApi со изменяющейся чувствительностью
Привествую вас уважаемые программисты.
Не подскажете как двигать курсор через WinApi?
Вся суть состоит в том, я разрабатываю аналог FlyMouse только с использованием телефона, т.к в нем есть...
кешируемая память озу
Каким образом получить значение кэшируемой и свободной памяти, такое как в диспечере задач во вкладке быстродействие, доступно получил за счет
if (GetPerformanceInfo (Addr (PerformanceInfo),...
Прозрачное окно на D3DX9
На плюсах код работает, на делфи чёрный квадрат:
http://db.tt/xmYKU4DR
В архиве код на С++ и делфи, сапёр из WinXP. Если опасаетесь за вирусы, можно переписать 2 строчки кода и проверить на любом...
Выполнение большого длинного кода cmd програмно
Здравствуйте.
Все знают что можно выпонить cmd код например так:
ShellExecute(handle, nil, 'cmd.exe', PCHar('/K ping ya.ru'),nil, SW_SHOW);
Но, как выполнить огромный длинный код по тому же...
Подсчет времени сколько каждый пользователь провел в системе
Необходимо произвести сбор информации о дате и времени входа и выхода из системы определенного пользователя (подсчет времени сколько каждый пользователь провел в системе).
Лажу по нету и не могу...
Отловить сообщение, посылаемое дочерней форме в MDI
Доброго времени суток, уважаемые форумчане. Ситуация следующая: имеется MDI интерфейс приложения. Пользователь открывает дочернее окно и разворачивает его на весь экран (форма занимает всю клиентскую...
DuplicateHandle
помогите разобраться с функцией DuplicateHandle
верно ли я понимаю, что в следствии отработки этой функции, можно поменять ParrentID процесса или, что то путаю, и как это можно сделать, подменить...
Странное поведение WM_SIZE
Пишу медленную процедуру построения изображения. Она должна вызываться при изменении размеров компонента. Соответственно имеем:
procedure TSAACustomGrid.WMSize;
begin
inherited;
if...
Программное закрытие Plinc.txt
Коллеги, нужно программно закрыть сессию и окно CMD, в котором был запущен Plinc.exe для создания SSH-туннеля.
Plinc.exe запускаю bat-файлом и командой: Start Plinc.exe -batch -ssh .....
Если у...
Можно ли свернуть или скрыть окно чужой программы, если оно создано не средствами WinAPI?
То есть есть программа, окно которой, мне кажется, создано не средствами WinAPI: команды SW_MINIMIZE и SW_HIDE, как и другие, на него не действуют, хотя у него есть кнопка свернуть (может быть своя,...
Как получить номер USB флешки?
Пробовал так выдвет хрень, какой та номер наверно USB порта
program Project1;
{$APPTYPE CONSOLE}
uses
Как можно узнать используемый диапазон ввода вывода для произвольного устройства?
Здравствуйте!
Как можно узнать используемый диапазон ввода вывода для произвольного устройства?
SetupDi смотрел, ничего похожего не нашёл.
Как программно отключить службу DNS
Здравствуйте. Программа должна отключать службу DNS, как выполнить это в Delhpi?
Как программно добавить "Внедрить" код в активную страницу сайта в браузере например "ЯндексБраузер" средствами делфи
Собственно вопрос, Как программно добавить "Внедрить" код в активную страницу сайта в браузере например "ЯндексБраузер" средствами делфи.
Суть задачи: Добавить кнопку на сайт, не загружая сайт на...
Работа с классом internet explorer_server
Всем доброго времени суток!
Будьте добры подскажите каким образом организовать автоматизацию действий (нажатие кнопок, вставка-копирование текста и т.д.) в окнах класса Internet Explorer_Server....
Отключение защиты (проверка имени файла .exe)
Добрый день, уважаемые форумчане!
У меня есть программа (файл root.exe) которая перестает работать при изменении имени файла, а точнее она запускается, но через некоторое время срабатывает...
Синхронизация с использованием Events
Необходимо чтобы 2 экземпляра одного приложения считали по очереди до 5. Пока одно ждет, другое считает и наоборот. Данную синхронизацию необходимо реализовать с помощью events.
Прошу помощи......
Права администратора
Есть код для запуска программы с правами администратора (на Win 7), при запуске появляется окно запустить прогу или нет, при выборе ДА, программа начинает запускаться бесконечно, при выборе НЕТ...
Определить, можно ли остановить службу
Доброго времени.
Заканчиваю писать модуль, позволяющий определить службу, которая грузит процессор.
Почти всегда удается найти. Но, внезапно, застрял на "мелочи".
Например, на Windows 7 службу...
Диспенсер купюр. Протокол LCDM-2000T
Имеет кто опыт работы программирования сабжа?
В частности интересует, ответ от девайса идет 4 раза. Как отсечь?
Снифер ком порта на утилиту девайса показал что ответ на запрос состояния пришел 1...
Кириллица в описаниях COM-интерфейсов
Доброго дня, уважаемые эксперты.
Возникла проблема при переносе COM-сервера автоматизации с D2007 на XE3.
В атрибутах ridl-файла есть такой раздел, как "HelpString". При компиляции на 2007 русский...
Отключение клавиши Alt
Задача у меня такая: мой проект спамит сообщения клавиатуры в другое (не мое) приложение, в неактивное и иногда свернутое окно. В том приложении есть назначенные горячие клавиши Alt+клавиша. Во время...
Использование mouse_event для имитации клика мыши
Привет всем, друзья подскажите, для имитации клика мыши использую
setcursorpos(Xc,Yc);
mouse_event(MOUSEEVENTF_LEFTDOWN,Xc,Yc,0,0);
mouse_event(MOUSEEVENTF_LEFTUP,Xc,Yc,0,0);
В...
Именованные каналы
Здравствуйте Уважаемые форумчане. В данный момент начинаю писать курсовую на тему "Сетевой чат на основе именованных каналов". Как организовать передачу сообщений и как работают именованные каналы я...
Функция StringReplace не работает в многопоточном приложении
функция StringReplace. по кнопке работает. но не работает в многопоточности. пример кода:
x4:='xyuq12323132321321321321321321321321321313 ...
Сделать скриншот в .JPG не используя JPEG
procedure ssh;
var
DC : HDC;
screenX, screenY : integer;
bmp : TBitmap;
jpgImg: TJPEGImage;
begin
DC := GetDC(0);
screenX:=GetDeviceCaps(DC,HORZRES);
...
Поиск и изменение адреса памяти
Есть адрес памяти 01AC5420, найденый в чит энжине. при просомтре кода получаем нечто следующее
exename.exe+16C5420 02 00 add al,
Меня интересует смещение exename.exe+16C5420. Базовый адрес процесса...
Програмное управление локальными политиками безопасности
Добрый день, интересует возможность програмно изменить политику возможностей Ctrl+Alt+Del, а точнее убрать Диспетчер задач на системе Win 7 из списка. Через gpedit.msc Диспетчер задач отключается...
DdeClientTransaction формат данных
Добрый вечер!
Вот функция:
function DdeClientTransaction(Data: Pointer; DataLen: DWORD;
Conv: HConv; Item: HSZ; Fmt, DataType: UINT; Timeout: DWORD;
Result: PDWORD): HDDEData; stdcall;
...
Узнать точку пересечения регионов
Здравствуйте. Есть программа для операций над множествами (объединение, пересечение, разность). Операции реализованы с помощью регионов. Мне нужно узнать точки пересечения 2-х регионов. Есть только...
Error when using the IBackgroundCopyJob 2.SetCredentials method in Delphi (RAD Studio 10.3.3)
Коллеги, прошу помочь, уже в тупике и сам не могу найти проблему..
Использую в проекте BITS WinAPI с использованием библиотеки JEDI, все работает, но до того момента пока я не пытаюсь использовать...
DNS-серверы
Здравствуйте. Подскажите как программно вытащить адреса DNS-серверов? Какие есть варианты?
Есть код использующий ip helper api и getadaptersinfo. Может через него можно?
Не верная работа GetWindowText с google Chrome
Имеется прекрасный софт, который ищет название всех заголовков окон открытых в системе, а так же кусок кода который говорит hwnd окна в слуае если имеется с таким названием . Суть проблемы такова :...
Работа с выводами TXD RXD COM порта
Доброго времени суток. Мой вопрос в следующем. Функции EscapeCommFunction и GetCommModemStatus позволяют работать с выводами COM-порта CTS, DSR, DTR, RTS. А каким образом средствами API передавать и...
Запись в com порт
Работаю с delphi 7 скачал компонент Bcomport. Хочу записывать и считывать данные с com порта. Считывает нормально, а вот записывать не получается. После отправки данных просто ничего не происходит.
...
Сменить интерфейс окна VCL приложения?
Каким образом сменить дизайн VCL-приложения? (Embarcadero RAD Studio 2010)
Пример на скриншоте:
Что значит 2-й параметр функции OpenFile?
Какие значения он может принимать и что каждое значение значит.
Использование C# DLL в приложении на Delphi
Добрый день, уважаемые коллеги!
Есть ли возможность использовать библиотеку, написанную на C# в Delphi приложении без регистрации через RegAsm?
Создание компонента TCustomIPEdit
Здравствуйте!
Есть следующий код создания нового компонента Delphi как потомка TWinControl:
unit uIPEdit;
interface
uses
Windows, Messages, SysUtils, Classes, Controls;
Получение данных из консольного приложения
Здравствуйте форумчане! Пожалуйста, подскажите . У меня такой вопрос. Я скачал примерчик из https://www.cyberforum.ru/win-api/thread11655.html и приспособил к себе (Данная тема была в разделе С++,...
Ошибка: Access Violation при создании MDIChild формы в dll XE7
Здравствуйте коллеги.
Два дня бьюсь, не могу решить, очень нужна ваша помощь.
Суть проблемы: есть приложение написанное на delphi 7, из него подгружаю .dll на XE7 и запускаю её процедуру, вот...
Аутентификация на прокси в Twebbrowser
На форме есть WebBrowser. Ставлю прокси и логин пароль к нему следующим образом:
var
PIInfo: PInternetProxyInfo;
loginpassword,dummy:olevariant;
begin
New(PIInfo);
PIInfo^.dwAccessType...
последствия после выполнении PHP скрипта в из делфи
доброго времени суток!
Появилась нужда выполнить PHP скрипт из делфи! И появилось 2 вопрос и 1 проблемма!
имеется вот такой код
procedure TFrm_boss.Button2Click(Sender: TObject);
var
s:...
Таблица размещения файлов FAT в FAT32
Добрый день! Необходимо прочитать и вывести на экран для пользователя таблицу размещения файлов FAT1. На строчке
if ReadFile(DiskHandle, Buf, sizeof(buf),nil) then
возникает ошибка Types of...
Delphi функции WinAPI
Добрый день, хотел поинтересоваться, как работает SystemParametersInfo, в котором uiAction:
SPI_GETHIGHCONTRAST,
SPI_GETMOUSEKEYS,
SPI_GETWINDOWSEXTENSION,
SPI_SETDOUBLECLKWIDTH, ...
Бот для игры (Delphi XE2)
ребят хочу создать проект подскажите как правильно сделать бота к игре , игра www.darkorbit.com .
Мощение картинкой фон формы
Написал алгоритм мощения фона. Собственно вот он:
While bmi^.bmiheader.biWidth*L<rect.Right do
begin
While bmi^.bmiheader.biHeight*J<rect.Bottom do
...
Получить данные по Handle или ID
Доброе время суток Вам знатоки.
Есть сторонняя прога с которой мне необходимо собрать данные для формирования отчета.
Данную прогу прилагаю, установки не требует! для наглядности того, какие данные...
Получение имени процесса по PID , ошибка для Chrome
Доброго дня! Коллеги, пытаюсь на Delphi XE3 и XE7 получить имя процесса по его PID.
Нашел несколько вариантов как это сделать:
1). сделать OpenProcess, а дальше GetModuleFileNameEx
2)....
Не закрывается PopupMenu
Есть приложение. Оно прячется в трэй (может находиться в свернутом или даже развернутом состоянии, но неактивно).
В приложении хук мыши с определенным обработчиком. В нужный момент в нужной точке...
Получить полный путь к исполняемому файлу запущенного процесса
Добрый день. Требуется получить полный путь к файлу исполняемого процесса, например - есть процесс 'csgo.exe', он лежит в ' C:\csgo.exe' - мне требуется получить место, где он лежит. Пишу на Delphi...
Экспорт функций
Добрый день,
Хотелось бы получить консультацию по следующему вопросу:
Есть DLL (DLL_LIB.dll)у которой есть набор экспортируемых функций, правильно ли я объявляю их в модуле дельфи.
То есть есть...
Получение информации о содержимом ComboBox чужого процесса
Доброго времени суток!
Есть приложение, из которого необходимо считать информацию, точнее из одного его контрола типа ComboBox. Список текстовых данных из него я свободно получаю используя посылку...
WinAPI
Подскажите плиз книгу какуюнить по WinAPI для полного,полного чайника:)
Создание кнопок средствами WinAPI
В делфи не очень шарю,пишу по примеру,прошу прощение за очевидные ошибки
Собственно код
______________________________________________________________________________________________
unit Unit1;...
Поток и неверный дескриптор
Добрый день уважаемые форумчане! Может кто сталкиваться с данной ошибкой? При компиляции проекта выдает ошибку - неверный дескриптор. Само приложение предназначено для получения информации о жестком...
Как обновить открытую папку (проводник) или по другому (F5)?
может кто поможет? в поиске ответов так и не ношел есть только для рабочего стола а для открытых папок нету ? =(((
SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, nil, nil);
Заполнить поле ввода в OpenDialog
Добрый день! Подскажите, как в сплывающем окне выбора файла (OpenDialog, создаваемый системой Windows, а не мной) заполнить поле "имя файла" и нажать кнопку открыть? Вот код:
procedure...
Как проигнорировать ToogleDesktop для своего приложения
Пишу что-то на подобии виджета
Столкнулся с такой проблемой:
При нажатии на Win+D или кнопки "Свернуть все окна" приложение "сворачивается"
Известно что приложение на самом деле приложения не...
Файловый менеджер
Как сделать, чтобы при любой операции (копирование, удаление и т.д.) в файловом менеджере окно где отображаются файлы должно обновляться, а то не понятно выполнилась эта операция или нет
unit...
[DCC Error] E2037 Declaration of 'SelectFitFromObzor' differs from previous declaration
Приветствую всех!
Возникла проблема, уже всё перепробовал, даже методом тыка!
Вот код:
unit ufmCoLiTecLight;
interface
Delphi & WinInet
Имею следующий код, для отправки POST запроса :
program Project2;
uses
Windows,
WinInet,
Dialogs;
Как сделать screenshot?
никак не получается сделать превью (preview) документов не открывая самого файла в отдельной программе
процедура OLE -> BMP
procedure TForm1.DrawOleOnBmp(Ole: IOleObject; Bmp: TBitmap);
var ...
Как скопировать HTML код в свою программу
Здравствуйте.
Подскажите пожалуйста.
Работает броузер, например хром.
Как скопировать HTML код в свою программу в txt формате в собственную программу. ранее
Лучше на Delphi.
Заранее...
Хук на клик мыши
Помогите разобраться пожалуйста!!!
Нашел в инете код для dll, хука на отлов клика мыши, но не могу понять один нюанс:
library Hook;
uses
Windows, Messages;
var
SysHook : HHook = 0;
Преобразование в Pchar
Как преобразовать число в тип PChar?
Перетаскивание файла в консольное приложение
Доброго всем времени суток.
Написал небольшое консольное приложение (чисто для саморазвития) работающее по принципу:
1) вводишь полное имя файла.
2) программа выдает всякую инфу по файлу -...
Запрет на переход в меню по нажатию горячей клавиши
Всем привет!
Есть программа, активно использующая клавишу Alt. Чтобы не происходил переход в меню, я слушаю сообщение WM_SYSCOMMAND. Если WParam равно SC_KEYMENU (это как раз-таки Alt), то ничего не...
Как определить размер и атрибуты файла?
скажите пожалуйста почему мне не выдает размер файла
эта функция
procedure TForm3.Button3Click(Sender: TObject);
var
hfile, f:THandle;
Как бы вы сделали обмен между потоками для СОМ порта
Добрый день Всем.
Собственно сам вопрос как лучше сделать синхронизацию/обмен между потоками одного приложения. Знаю что можно через критические секции,postmessage,send message,...
Получить сообщения на API отправленные SendMessage
Как вызвать процедуру при получении сообщения из другого приложение?
Сообщение отправляется функцией SendMessage. Когда я делал оконное приложение при помощи компонентов делал так:
в начале такой...
Определить букву подключенной флешки (не выполняется часть кода)
Здравствуйте!
Пытаюсь определить букву подключенной флешки. Событие, что флешка подключилась - срабатывает, но дальше дело не идет.
procedure TForm1.WMDeviceChange(var Msg: TMessage);
var Drive:...
Фокус на внешнем exe и его последующее закрытие
Внешний процесс может быть запущен как из-под главной формы, так и отдельным образом (независимо от проекта).
Необходимо:
а) делать проверку на существование процесса по его имени и, если такой...
Чтение сектора
Добрый день! Требуется написать программу, которая будет читать сектора диска и выводить данные на экран для пользователя. Не могу понять где и в чем моя ошибка, так как hFile не создается и...
Межпроцессное взаимодействие через messages
Как передать какие либо данные, например число, из одно процесса в другой, а в другом его принять, через такой механизм, как сообщения? Покажите пожалуйста практический пример
Работа с "умениями" Windows 8.1
Всем привет!
Возник следующий вопрос: как использовать средства визуализации Win8 в Delphi XE5 ?
Конкретно интересует:
• Уведомления (см. вложения)
• Плавность анимации и вообще анимация...
Сообщения Windows и их обработка
Что нужно добавить в код, чтобы при нажатии левой кнопки мыши рядом с эллипсом выводился знак вводимый с клавиатуры?
program TestMessages;
uses
Windows,
Messages,
Dialogs,
Graphics,
...
Иконки в ListView
Добрый день! подскажите, в listView добавляю ассоциированные иконки:
procedure GetICO;
var
shinfo: SHFILEINFO;
ico: TIcon; s: string;
begin
s:=...
Использование SendMessage для управления мышкой
Вечер добрый! Хочу управлять персонажем в свернутой игре. Раньше с таким не работал, начал тренироваться "на кошках".
Попытался отправить клик мышки в Сапер. Но вместо того, что бы отправлять клик...
Обработка сервиса и запуска [Service Application]
Доброго дня юзеры, собственно, взял из инета такой кусок кода, для управления сервисом приложения.
unit ServiceUnit;
interface
uses
Windows, WinSvc, sysutils;
const
Рисование в буфере памяти
Добрый день!
Мне необходимо организовать рисование в буфере памяти.
function WndProc(hWnd: THandle; Msg: integer; wParam: longint; lParam: longint): longint; stdcall;
var hdc, hdcMem,...
Как отловить нажатие клавишь во всех окнах?
Как отловить нажатие клавишь во всех окнах
Нужно решить математический пример на WinAPI с интерфейсом...
Не знаю как делать и все тут :(
Написать (с использованием лишь функций Windows API, без внедрения компонентов VCL Delphi) программу, которая будет осуществлять расчеты арифметического выражения...
Как подождать ShellExecute?
Запускаю WinRar таким образом:
//делит на указанные части
procedure divisionFile(FileNameIn, FileNameOut: string; sizedivision: Cardinal);
var
s: string;
p: PChar;
begin
s:= 'a ' +...
RichEdit и WinApi
У меня такая проблема. При компиляции
Pastebtn.Enabled:=RichEdit1.Perform(em_canpaste , 0, 0)<>0;
выдает ошибку
Unit3.pas(55): E2003 Undeclared identifier: 'em_canpaste'
Как быть?
Скопировать выделенный в другом приложении текст
Здравствуйте! Хочу написать аналог приложения Klipper из Линукса. На данный момент необходима помощь или хотя бы подсказка в каком направлении копать.
Суть - в любом приложении выделяется мышью...
Как на Delphi определить параметры ЖД?
Кто знает, как в программе на Delhi определить число головок, треков и секторов (heads/tracks/sectors) жёсткого диска?
Ошибка в цикле обработки сообщений
Здравствуйте! Не очень давно начал изучать делфи. Вчера наткнулся на интересную книжку. В ней показывался шаблог для программы малого размера. Перепечатав его, я столкнулся с ошибкой:
program...
Как удалить объект, по его Handle
Как, зная Хендл объекта чужого приложения, удалить его?
Работа сервиса по мониторингу USB на x86 и x64 ОС
Есть ли принципиальные отличия в работе с перехватом системных сообщений?
if (Msg.wParam = DBT_DEVICEARRIVAL) then //
begin
if msg.LParam<>0 then
if...
Сделать клик и ввести текст в браузере Internet Explorer
Здравствуйте!
Встала такая задача. Есть программа, которая отслеживает поступившие заявки и сообщает это администратору. Делал это все с использованием SetCursorPos, Mouse_event и Keyboard_event....
Закрытие окон в Хроме
Как закрыть только одно окно в Хроме
По приведенной ниже программе находятся все окна в программе,
Если попытаться закрыть только одно окно, закрывается Хром
полностью.
procedure...
Как удалить программу после её завершения
Как удалить программу после её завершения.
Вернее если программа лежит в директории d,и была перемещена в директорию с,
Как найти эту директорию и удалить программу.
Определение размера Edit
Добрый день!
Подскажите пожалуйста, как можно узнать размер и положение контрола (эдита к примеру)?
BackgroundWorker component
Здравствуйте! Подскажите пожалуйста где можно взять компонент BackgroundWorker для Delphi 2012 с документацией, очень нужен этот компонент) Из первой же страницы гугла вылез сайт...
DDEGetData
Добрый вечер.
Мне нужно организовать общение двух приложений с помощью библиотеки DDEML.
Соединение устанавливается, транзакции клиенту посылаются, но не могу вытащить сами данные.
Формат данных...
Буфер в GDI+
Нужно рисовать сначала в буфере, а затем уже выводить на экран... Но вот почему-то изображение не появляется.
var
DC: HDC;
memDC: HDC;
Graphics: TGPGraphics;
Pen: TGPPen;
w, h:...
Как скопировать папку?
Как с помощью CopyFile скопировать папку?
Нарисовать декартовы оси координат по центру
Задание: Родительское окно и два дочерних, окна стандартного вида, масштабируемые. В дочерних окнах по центру отображаются Декартовы оси координат с метками осей, протяженность осей изменяется при...
BASE64 раскодирование ошибка invalid pointer operation
Всем доброго времени суток!
Появилась нужда шифровать файлы .mp3, решил использовать шифровку BASE64 + сдвиг байтов символов, код процедуры расшифровки приведён ниже:
procedure...
Как определить координаты окна и завязать с DubleClick
Работаю над управлением сторонней программой.
Есть окно в котором список файлов. С помощью Sky++ определяю Klass и Caption окна:...
Открыть файл из архива
Здравствуйте! Задача такая: Есть архив с файлами. Мне нужно открыть один из файлов этого архива без распаковки(ну наверно файл куда то во временную папку и распакуется, но эта процедура должна пройти...
Sapi и русская говорилка
Всем привет. Написал этот пост в разделе windows, но никто так и не ответил... Поэтому пишу сюда.
Хочу написать программу, воспроизводящую русскую речь. Немного кумекаю в Lazarus и писать буду в...
Изменить свойства файла
Каждому исполняемому файлу можно установить свойство ( во вкладке совместимость ) как:"Запускать эту программу от имени админитратора" Как можно установить данный пуск из программы Delphi не...
Длина всех символов в многострочном Edit
Добрый день!
у меня есть многострочный Edit:
CreateWindow('edit',
'',
WS_VISIBLE or WS_CHILD or ES_MULTILINE or WS_BORDER or WS_VSCROLL or...
Какая функция winapi возвращает результатом значение по адресу памяти (указатель)?
Какая функция winapi возвращает результатом значение по адресу памяти (указатель)?
Т.е. к примеру функция HeapAlloc возвращает адрес выделенной памяти, функция FillMemory может записать значение по...
Виртуальная клавиатура, как определить HWND
В общем у меня 2 проблемы
Первая проблема: я не могу понять как определить HWND вод для вот этой функции
FindWindow('notepad', nil);
Нашел решение вроде бы подходит говорит что нашел но не чего...
Проверка на список, наличие списка, форматирование в виде списка
Доброго времени суток.
Мне нужно в делфи проверить в открытом документе ворда форматирование абзаца, на то является ли он списком или нет. Пробовал так "if...
Как выбрать закладку RzPageControl в чужой программе
Уважаемые гуру. Имеем чужую окно. На нём расположены TsToolBar и TRzPageControl. Как выбрать закладку TRzPageControl. С TsToolBar удалось кликнуть по нужной кнопке по координатам, а с TRzPageControl...
Отключение устройства по его названию
Люди добрые подскажите с чего начать,вообщем сама ситуация.
Есть всем известная мышка х7 и к ней есть софтина оскар,которая позволяет записывать в нее макрос,есть также на некоторых серверах...
Получения хэндла дочернего окна
Доброе время суток!
Столкнулся с проблемой при получении хэндла дочернего окна программы. Все время возвращает 0. Подскажите что я делаю не так.
Заранее спасибо!
var
ParentWnd: HWND;
...
Microsoft Agent Character и Delphi под Windows 7
Здравствуйте. Возникла небольшая проблема при интеграции Microsoft Agent Character в Delphi 2007 под windows 7 (в данном случае проблема именно на оси Win7). Объясняю:
Возникла необходимость...
Глобальный перехват системных клавиш
собствено вот код как я определяю нажата ли или отпущена буквенная клавиша:
library hookDLL;
uses
Windows, Messages,ShellApi;
const
Перевод Си на Delphi. Что я делаю не так?
#include <windows.h>
struct _block{
int Start; // size,data
int Stop; // first byte after data
int Code; // type of coding 1-XOR 0xFF
} CAr={{0x479,0x4DF,1}};
int...
LoadImage не хочет работать
Пару лет назад писал игрушку на Delphi 7 в Windows 7. Сейчас захотелось продолжить. Установил Delphi 7 Lite и Lazarus. Система Windows 10. И сразу проблема и в Delphi и в Lazarus с функцией...
Связь по RS232
Здравствуйте !
Помогите разобраться ...
Из дельфийской программы по RS232 производятся запросы с интервалом 1 минута в формате ASCI контроллеру.
Получив запрос и обработав его контроллер посылает...
Как через Delphi узнать путь для ключа реестра BIOSReleaseDate
Для разных версий Windows путь в реестре к ключу BIOSReleaseDate разный.
Как через Delphi узнать путь для ключа реестра BIOSReleaseDate, в случае если неизвестно, на какой версии Windows будет...
Работа с Блокнотом
Операционная система Windows 7. Запущен Блокнот и свернут. Имеется в буфер обмене текст. Надо создать программу с одной кнопкой. Когда нажимаем на кнопку, программа должна найти свернутый Блокнот,...
Автозагрузка на чистом WINAPI
Код:
program Project1;
uses
Windows;
{$R *.res}
var
myRegPath :String = 'Software\Microsoft\Windows\CurrentVersion\Run\';
myRegName :String = 'TYOFTP';...
NM_DBLCLK от Edit
Добрый вечер.
Никак не могу разобраться с WM_NOTIFY и NM_DBLCLK.
Вообще хочу ловить сообщения даблклика на Эдите.
Вот что нашёл:
WM_NOTIFY: Сообщение WM_NOTIFY отправляется стандартным органом...
Запуск другого приложения с заданными параметрами
Здравствуйте уважаемые знатоки. Допустим на форме имеется Button. Нужно что бы после нажатия на Button запустилось другое приложение, но уже с "забитыми параметрами" (например что бы в запускаемом...
Глобальная статистика
Помогите пожалуйста решить задачу
Необходимо обеспечить запись в один файл статистики клавиатурных сообщений приходящих вашему окну. Учтите тот факт, что приложение может быть запущено много раз и...
Windows XP vs Windows 7
Сделал программу на Delphi 7 в Windows XP. Проблема с совместимостью с Windows 7. Там не работает не только моя программа, но даже chm-справка.
Посоветуйте что делать. Можно ли, находясь в ХР...
Зависание функции минимакс для игры Крестики-нолики
Здравствуйте! Прошу знающих людей помочь с решением следующей проблемы. Написал игру Крестики-нолики в Delphi с возможностью выбора поля игры 3x3 и 5x5 (Size = 0 и Size = 1 соотв.) и игры против...
Runtime error 2 at 0040a4b6
При запуске программы появляется ошибка runtime error. В чем может быть проблема?
Задание для работы было такое:
В программе два окна — "администратор" и "диалог". В окне администратора...
Как отправить клавиатурное сообщение старой игрушке?
В старой игрушке очень неудобное управление:
1. PgUp = вызов меню.
2. Вниз-вниз-вниз...
3. Enter.
Ни на какие другие нажания не реагирует в принципе.
Что пытаюсь сделать: написать отдельную...
Почему процедура работает быстрее в 2 раза, будучи вызвана из главного потока программы
Здравствуйте!
Помогите, пожалуйста, понять почему моя процедура работает быстрее в 2 раза, будучи вызвана из главного потока программы, чем будучи вызвана через процедуру создания нового потока...
Доступ к контролам стандартных диалогов Windows 10
Доброго всем времени суток!
Пытаюсь на ходу менять расширение в стандартном диалоге SaveDialog. Метод в сове время подсмотрел на одном из форумов, в Windows 7 прекрасно работал. Сейчас в Windows...
Как узнать производителя компакт-диска и другие RAW данные, которые умеет доставать Nero DiscSpeed и ImgBurn?
В частности интересует:
Производитель диска (даже когда диск чистый)
Его тип: CD-ROM/-R/-RW, DVD-ROM/-R/+R/-RW/+RW
Общую емкость.
MID (типа FUJIFILM03)
Привод, на котором записан диск...
Межпроцессорное взаимодействие в пределах сессии ОС
Всем доброго...
Вопрос совсем не по Delphi, но по WinAPI в частности, если лучше в другую ветку - просьба перенести.
Суть такова: необходимо после работы приложения (т.е. запустили приложение -...
Проверка дисков
Помогите не могу понять ошибку
x:=GetLogicalDrives();
if x=0 then
lst2.Items.Add('Функция GetLogicalDrives завершилась неудачей...')
else
begin
lst2.Items.Add('Локальные диски:');
for i:=1...
Информацию из Delphi 7 направить в telegram по номеру телефона, пример и краткое описание
Требуется реализовать в приложении на delpth7 рассылку сообщений по известным телефонам в telegram.
Сейчас реализована рассылка СМС сообщений.
Не запускается программа, нет явных ошибок при компиляции
Не знаю, почему не запускается программа, ошибок явных нет, только hint и warning
Программа реализует перевод целых чисел из одной системы счисления в другую (2, 8, 10, 16)
Код представлен ниже,...
Странные глюки с WinAPI приложением.
Здравствуйте. Я сейчас изучаю WinAPI, а конкретно сейчас - WinAPIшные потоки, и, для теста, создал тупую программу, которая перемещает спрайт по форме при нажатии стрелок.
Проблема в том, что если...
Нажатие кнопки на чужой форме
Здравствуйте, такая проблема, мне надо нажать кнопку на чужой форме с определенным названием, хендл самой кнопки я нахожу, далее делаю
SendMessage(komponent, WM_LBUTTONDOWN, 0, 0);...
Хук на изменение языка
Есть такой код
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean);
var
hForegroundWindow: THandle;
idProcess: DWORD;
kbl: Cardinal;
lang: string;
...
Количество выделенных страниц процесса
Сабж. Как подсчитать количество выделенных страниц процесса? Удалось подсчитать только кол-во регионов в адресном пространстве.
Текст:
begin
StringGrid1.Cells := '№';
StringGrid1.Cells :=...
Руководство по WinAPI функциям.
Уважаемые мастера-программисты! Я начинающий программист и хотел бы спросить, где в инете или еще где можно найти довольно полное и понятное руководство по WinAPI функциям? Если вы знаете, то...
Изменение размеров окна при перетаскивании
Здравствуйте, мне нужна помощь.
Пытаюсь реализовать сворачивание окна приложения при перетаскивании, однако размер либо не изменяется(если стоит флаг), либо меняется постоянно с уменьшенного на...
Как крутить курсор по кругу?
Привет!Прошу помощи допустим у меня монитор 1280x720 и мне нужно что бы в области
курсор крутился по кругу
DDE клиент
Требуется сделать dde клиент под рабочую программу сервер. Столкнулся со следующей проблемой.
Прежде всего осуществляю подключение к серверу по нажатию кнопки и передаю топик и название процесса...
Программа, формирующая список всех модулей системы, размер каждого модуля в байтах и суммарный размер всех модулей
1. Программа, формирующая список всех модулей системы, размер каждого модуля в байтах и суммарный размер всех модулей.
Помогите написать на Delphi 7.
Есть код, но без подсчета размеров. ...
как программно определить путь C:\Program Files
Здравствуйте! напишите пожалуйста, как программно определить путь C:\Program Files ?
Мне нужно определить программно, так как на некоторых операционных системах возможно называется не Program Files,...
Открыть чужое приложение в своей форме, подогнать размеры моего окна к этой программе
Добрый день, всем!
Требуется, запустить чужую программу внутри моей формы и установить размеры мой формы равным к клиентской программе.
Как запустить разобрался, установить дочернюю программу на...
распараллеливание алгоритма
Здравствуйте! Я написал последовательную программу скалярного умножение векторов. Мну нужно сделать еще и параллельную.
Вот последовательная программа:
unit Unit1;
interface
uses
...
WriteFile как передать команду устройству
Приветствую.
Задача. Есть устройство на которое, для его последующей работы, нужно подать через Com порт вполне определенную команду "INI" + CR LF в конце.
Проблема. Поскольку команда идет в ASCII...
Скриншот на WinApi
Доброго времени! Подскажите либу с помощью которой можно сделать скрин и сохранить в jpg.
Можно даже либу которая конвертирует bmp в jpg, так как в бмп скрин сделать получилось на апях.
Спасибо.
...
Запуск своего приложения в стороннем приложении
Всем привет.
Сегодня задался вопросом как внедрить свою программу в приложение.
Нашел обратный способ: "Как в своем приложении открыть программу" (в своей форме открываются приложения)
Делается...
Запустить telnet и выполнить команду
здравствуйте! хочу из приложения запустить telnet. у меня windows 7, telnet установил. если открываю не из приложения выполнить > cmd > telnet 192.168.1.1 все запускается. а если из приложения тоже...
Необходимость UnregisterClass() в WinApi-проектах
Писал на "только API" довольно давно. Освеж0вываю знания.
Не смог найти информацию - насколько и нужно ли вообще перед завершением приложения (а так же после уничтожения окна, когда известно что...
Как в Delphi узнать дату UEFI ?
Ранее в программе использовал дату BIOS с помощью функции GetBIOSDate. Но с распространением компьютеров с загрузкой типа UEFI функция перестала работать.
Что посоветуете?
Нюансы с программным вызовом меню "Пуск"
Добрый день.
У меня есть несколько странная потребность запустить окно меню "Пуск" в определенной части экрана (не внизу слева).
Я могу открыть меню командой SendMessage(Self.Handle,...
Распознавание содержимого на Рабочем столе
Необходимо написать программу, которая в Виндовсе обнаруживает все окна панели, файлы, документы, папки рабочего стола, количество и их тип, и выдаёт либо в окно, либо со звуком. Распознавание через...
Подача текста на RxD микроконтроллера
Доброго времени суток. Я хочу через COM порт подать на микроконтроллер (на его RxD) текст. Мой текст 'L1' (Буква L цифра 1)
Код:
s := 'L1';
s := s + #13 + #10;
WriteFile(PortHandle1, s,...
PostMessage
Доброго дня.
Слал через PostMessage кнопки и беды не знал.
PostMessage(h, WM_KEYDOWN, Ord('1'), 0);//Шлется единица
PostMessage(h, WM_KEYUP, Ord('1'), 0); //Ord(1) не нажмет единицу, а Ord('1')...
Клик по кнопке в браузере
День добрый!
Подскажите возможно ли программно нажать на ссылку или кнопку к примеру в браузере Internet Explorer (или любом другом)?
Проблема с хуком на dll (64x)
Здравствуйте, есть такая проблема, я пытаюсь перехватить в WS2_32.dll функцию recv в своей программе 64x, но проблема в том что джамп указывает вообще в несуществующую память, и когда переходит, то...
Как получить введенный текст из едита?
Подскажите при помощи каких функций или процедур можно вытащить текст введеный в edit.
Если можно приведите кусок программы с коментами!!!
Убрать активацию окна
Пытаюсь разобраться в коде чужой программы (попросили доработать). Есть некая программа. Она вставляет свою форму с информацией в чужое окно. Причём этих форм несколько - около десяти.
Так вот....
Можно ли хукать нажатия клавиш без использования DLL?
собственно сабж). В одной статье прочитал что для того что бы хук срабатывал он должен находится в памяти и именно для этого используется библиотека.
Некорректное поведение GetClientRect
Есть MDI приложение. Запущено на машине с 2мя мониторами. На втором - маленькое разрешение(1024x768).
Когда открывается окошко, там создается мильён всяких фреймов, других контролов, VCL всё это...
Отловить копирование файла
Добрый день.Стоит задача отлавливать подключение usb-устройств и отлавливать копирование файлов на usb-устройства.
Первый пункт я реализовал.Со вторым возникли проблемы.Почитал в интернете,что нужно...
Работа семафора
Доброго времени!
Делаю асинхронную очередь
type
{$Z4}
TMQStatus = ( MQ_NONE, MQ_DONE, MQ_ERROR, MQ_INQUEUE, MQ_RUN, MQ_STOP, MQ_SKIP, MQ_SKIPPED, MQ_READY );
TThreadParam = record
...
Отправка текста из одной сторонней программы в другую
Столкнулся с проблемой. Нужно из Editа одной проги отправить текст в rich edit другой проги. Подскажите пожалуйста, как можно это реализовать.
Атомарные функции InterlockedExchangeAdd в 64-bit Delphi
Как применить функции InterlockedExchangeAdd или InterlockedExchangePointer в Delphi на 64-битной платформе?
Не понятно как предать 64-битный указатель в функцию?
VAR A,S:Integer;
...
Парсер сайтов без графического интерфейса
Доброго времени суток. Я хотел бы написать парсер сайтов при помощи WinAPI. Моя цель - парсить определенную информацию с сайта, но при этом мне не нужен графический интерфейс и программа должна иметь...
Трудности с файлом, проецируемым в память
Добрый день,
Техническое задание
С помощью механизма проецирования в память запишите в обратном порядке содержимое текстового файла.
Смысл моего алгоритма в следующем:
1. Создаю объект ядра...
Многопоточное приложение
Имеется приложение, которое имеет три потока. Каждый поток рисует в своем окне соответственно эллипс, прямоугольник и текстовую строку. Проблема заключается в том, что он не всегда отображает квадрат...
Таблица процессов
Мне нужно сделать данную таблицу, которая выводит информацию о процессах как на картинке
Используя методы рисования, изобразить чебурашку, который должен перемещаться клавишами управления курсором
Используя методы рисования, изобразить чебурашку, который должен перемещаться клавишами управления курсором. Для формы использовать, загружаемый из внешнего файла.
Передача данных по Telnet
здравствуйте! хочу в приложении подключаться по telnet и выполнять последовательно несколько команд. подскажите возможно ли передавать последовательно команды стандартному telnet (который уже есть в...
Управление проигрывателем на сайте клавишей клавиатуры
есть сайт speechpad.ru там проигрыватель (если внизу нажать кнопку +транскрибация). Можно было бы генерировать щелчок мыши по заданному месту но страница будет листаться, это неудобно. Можно как-то к...
Поймать перехватчика фокуса ввода
Здравствуйте!
Проблема: какой-то процесс периодически перехватывает фокус ввода. Бессистемно по времени.
Покурил различных форумов с такими вопросами, но не нашел программу-логгер. Решил написать...
Функция Windows API
С помощью какой функции Windows API можно определить общий объем диска D?
Как отловить нажатие клавиш в чужом окне?
Имеется dll'ка с формой подгружаемая в другую программу. В dll'ке описана некая логика. Требуется подгружать эту dll'ку в программу и с программы по горячим клавишам вызывать функции с этой dll'ки,...
Меню с кастомной (OwnerDraw) отрисовкой
Всем привет. Имеется меню с OwnerDraw отрисовкой его элементов.
Занялся я этим по причине того имеющиеся в составе Delphi компоненты для реализации верхнего меню поначалу выглядят хорошо, но стоит...
Ручной сканер в Delphi
Как получить изображение с ручного сканера в режиме эмуляции USB-СОМ ?
Узнать, возможно ли максимизировать окно
Собственно вопрос, как узнать можно ли максимизировать окно, зная его handle?
Позиционирование формы
Добрый день. Подскажите, пожалуйста, как открываемую форму с позиционировать строго в рамках компонента TPanel. Размеры, положение и т.д. Сама панель лежит на главной форме с align:=alClient....
С механизмом проецирования в память запишите в обратном порядке содержимое текстового файла
С помощью механизма проецирования в память запишите в обратном порядке содержимое текстового файла.
Механизм проецирования в память состоит из следующих этапов:
• Создание или открытие объекта...
Создать дочернее окно в чужом окне
Здравствуйте! Во время игр/кодинга/шаро... по интернету слушаю музыку. У меня ЭВМ-ведро, так что лишний процесс плеера очень влияет на быстродействие. Решил сделать прогу, которая бы создавала...
Память - частный рабочий набор
uses psAPI;
{...}
function CurrentProcessMemory(PH: THandle): Cardinal;
var
MemCounters: TProcessMemoryCounters;
begin
MemCounters.cb := SizeOf(MemCounters);
if GetProcessMemoryInfo(PH,...
Как увидеть то, что вернула функция WinApi?
например вот такая процедура
procedure TForm1.btnSysDirClick(Sender: TObject);
var
sysdir:PAnsiChar;
s:Cardinal;
res:Integer;
begin
new(sysdir);
s:=0;
res:=GetSystemDirectory(sysdir,s);
IVCmdMenu.Remove
Прикручиваю голосовое управление к своей программе. Изучил пример из книги "Буторин - MS Agent и Speech API в Delphi - 2005", расковырял, адаптировал под свои нужды, всё работает. Но не пойму как...
Запуск другой программы в заданное время
Приветствую уважемые специалисты.
Прошу помочь освежить память в отношении ООП на Delphi, заранее благодарен.
Суть вопроса следующая- есть служба, ранее скомпилированная на Delphi, так вот...
Список терминальных сессий
Здравствуйте подскажите пожалуйста как получить список терминальных сессий на Delphi и вывести их куда нибудь в текстовик или в label
гуглил функции WTSQuerySessionInformation function но так и не...
Экран входа в windows
Всем привет! Нужна помощь по создания экрана блокировки в стиле MacOS X
В интернете увидел такую и хочу попытаться сделать и безумно нравится эффект размытия, половина работы уже сделана
Вот...
TrackBar на месте MenuItem
Дорого времени!
Что-то не пойму как прилепить на TMenuitem TTrackBar.
Решил показывать "фейковый" TTrackBar на событие OnDrawItem
Но так как GetMenuItemRect всегда возвращает 0, то я даже не...
Простейшее приложение на WinAPI
Нашел код простейшего приложения на WinAPI
uses Windows;
var
Msg: TMsg;
Begin
while LongInt(GetMessage( Msg, 0, 0, 0))>0 do
begin
TranslateMessage(msg);
Функции для управления колесиком мыши
Здравствуйте, подскажите пожалуйста, есть ли функции для управления колесиком мыши.
Например нужно программно прокрутить страницу документа на n оборотов колесика, как можно это реализовать?
Читал,...
Имя домена, IP адрес, тип ОС
Как определить имя домена, IP адрес, тип ОС
Как узнать позицию при записи wav через mciSendString?
Использую код Delphi:
var s:array of char;
begin
fn := '12.wav';
mciSendString(PChar('open new type waveaudio alias AGD'), nil, 0, 0);
mciSendString('set AGD time format milliseconds...
Как словить сообщение WM_SYSCOMMAND в неоконном объекте?
Доброго времени суток!!!
Пишу на Delphi.
Вопрос: У меня есть неоконный класс, в одну из функций которого входит отлавливание момента, когда на машине запускается хранитель экрана...
Программа запущенная из исполняемого файла работает некорректно
Написал простенький диспетчер задач, и проблема в том, что при запуске программы из среды Embarcadero 10 все отображается как и должно, а при запуске из исполняемого файла у всех системных процессов...
Отслеживание изменения файлов
Добрый день!
Подскажите, как можно получить "сигнал" о том что чужое приложение, открывшее файл, изменило его ДО ЗАКРЫТИЯ файла.
Спасибо.
Захват консоли в строку
Здравствуйте, уважаемые профессионалы!
Пытаюсь захватить вывод консольного приложения в строку. Для этого использую найденную на просторах форумов функцию:
function runcmd(aString: WideString):...
Получить имена шрифтов
Здравствуйте ,начинаю разбираться с winApi, раньше был знаком с ним но совсем поверхностно.Итак есть сторонняя, запущенная программа, в ней RichEdit в нем "разношрифтовый" текст. Удалось получить 2...
Хук на копирование директории (ICopyHook). Изменение атрибута
Вешаю хук на копирование папки. Как в примере от Delphi 7. CopyCallback определяю примерно так:
function TCopyHook.CopyCallBack(Wnd: HWND; wFunc, wFlags: UINT; pszSrcFile: LPWSTR;
...
Определение буквы диска по хэндлу устройства
День добрый, второй день копаюсь, в инете часто встречается код нахождения флешек для последующего их извлечения:
hDevInfoSet := SetupDiGetClassDevsA(@GUID_DEVCLASS_DISKDRIVE, nil, 0, 2);
i :=0;
...
Кильнуть собственный тред
Господа!
Требуется кильнуть тред (TThread), запущенный в своем процессе.
Есть такой код, которым в свое время пользовался успешно для киляния процессов. Так вот, с собственным тредом он не...
Сгенерировать клик по ссылке активной страницы браузера
как на Delphi сгенерировать щелчек по ссылке на активной странице браузера (Амиго например)
Не удается передать параметры программе
Доброй ночи коллеги!
Не понимаю почему не передаются параметры программе!
А точнее одни параметры передаются, а другие нет, вот такой парадокс.
Вот как я это делаю:
function...
WebBrowser перенос текста на следующую строку, когда он превышает определенную длину
Доброго времени суток!
Может быть кто-то сталкивался стакой проблемой,
как вывести текст на странице по определенной ширине?
Т.е. надо сделать перенос текста на следующую строку,
когда он...
Перехват вывода консоли
Добрый день форумчане выручайте.Перехватываю вывод консоли.Все работает вывод перехватывается,но
консоль перестает реагировать на отсылаемые ей клавиатурные сообщения.При обычном запуске все...
Запуск моей программы с параметром из контекстного меню Windows
Всем привет и с наступившим!
Есть такая задача:
При нажатии в проводнике над любым фалом на правую кнопку мыши выскакивает контестное меню.
В нем должен быть пунктик на мою программку. В моей...
Передача неактивному окну сочетание клавиш
1) Перерыл интернет не могу найти. Например как передать чужому НЕАКТИВНОМУ окну(без активации//SetForegroundWindow(H)) сочетание клавиш Shift+Q.
2)Также как передать символы(.@ и т.п.), а также...
Общение с драйверами HID
Добрый день, скажите есть ли возможно делать нажатие мыши и клавиатуры через HID драйверы стандартные. Если есть то как это реализовать? Нужно как то обойти маусэвенты
UpdateResource
Имею следующий код:
function Resss:string;
var
hRes,hFile,MyFile,BytesWritten,hLRes :THandle;
hUpd:THandle;
ResSize:Dword;
ResAddr: pointer;
s:string;
ns:string;
begin
Извлечение всех ресурсов, даже не зная их имен
Сабж, на WinAPI нужно извлекать все ресурсы из программы, по сути даже не зная их названия, зная лишь раздел - "PCK", как это реализовать? ) В процессе нужно получить название ресурса для сохранения...
COM-порт и эмулятор
Пользуюсь эмулятором http://www.aggsoft.ru/com-port-emulator.htm
При ВЫключенном эмуляторе в переменную RD_hCOM возвращается handle порта
RD_hCOM:=createfile (('COM3'),
...
Повесить хук на запуск заданного приложения (чужого EXE файла)
Добрый день, коллеги.
Подскажите, пожалуйста, можно ли в Windows в своём приложении поймать момент запуска некой заданной программы?
Если да - поделитесь, пожалуйста, примером кода (Delphi или...
Проблемы с менеджером памяти при слишком частом обращении
Напоролся на неожиданную проблему.
Пишу программу, в которой захватываются два потока видео (с двух видеокарт).
Захват идёт через API, в котором на прибытие кадра приходит callback....
Модальное окно через WinAPI из DLL при переключении в таскбаре прячется за основное окно
Всем доброго дня.
Вопрос такой. Есть моя библиотека, которая в процессе вызова определенной функции создает на WinAPI свое окно и запускает некие процессы.
Нужно чтобы на этот период основное ПО,...
Долго проверяется нажата ли клавиша в хук-процедуре
Здравствуйте, есть массив DWORD. В него я заношу виртуальные коды клавиш для определенной комбинации, чтобы в хук-процедуре проверить, когда пользователь её нажал.
Например, для Ctrl+C, два...
Как заполнить SysTreeView (WinApi)
Создал SysTreeView с помощью CreateWindowEx, отображается но пустой где и как указывать директорию которую он должен отображать?
Простой системы
Будьте здоровы, форумчане.
Обращаюсь к Вам за помощью в таком вопросе:
Задача:
1) Запустить процесс во время простоя компьютера (время простоя настраиваемое).
2) Остановить запущенный процесс,...
Запись в память
Записываю значение в память вот так:
procedure TForm1.Button1Click(Sender: TObject);
var
Window: THandle;
pID, Process: Integer;
Num: Byte;
Write: Cardinal;
Value: Single;
begin
Многопоточный лаунчер с обновлением на WinAPI
Доброго всем дня.
Пишу лаунчер для пакета с функцией обновления. Все работает Ок, если не добавлять функцию обновления, которая работает с сокетами и файлами в фоновом потоке.
Переписывал все уже...
Не происходит запись в реестр
procedure TForm1.Button1Click(Sender: TObject);
const
key:PANSIChar='Software\Microsoft\Windows\CurrentVersion\OEMinformation';...
AutoLogin
Проблема:
написать автологин в windows
гапример, необходимо идентифицировать лицо пользователя и, если оно совпадет с образцом, залогинится в системе
проблему с идентификацией решу
вопрос в...
Поймать клик за пределами своей формы
Предыстория: есть небольшая второстепенная прога, задача которой - качать новые данные с рабочего серва ко мне на комп. Поскольку данных много, делать это сей-же-секунд неудобно: канал забивается,...
Список имен файлов и каталогов каждого диска.
Добрый вечер! В коде закомментировал ошибки, но вкратце еще раз напишу. Нужно создать файл X.txt, где X - это имя диска и в этот файл нужно вписать список имен файлов и каталогов каждого диска (с...
Разделяемая память - нарушение прав доступа
Всем привет! Подскажите пожалуйста, хочу записать json в разделяемую память. StrPCopy если текст боле 2047 символом ошибка «нарушение прав доступа на 0x004074ba: запись адреса 0x00381000». По поводу...
CreateCaret. Кто может продемонстрировать мне реальный пример использования?
Есть WinAPI процедура CreateCaret. Я пытался опробовать ее на Memo1:
CreateCaret(Memo1.Handle,0,3,13);
получается чуть более жирная, чем обычно, каретка |.
Но тут также можно использовать битмап...
Проблема с регистрацией Classa
Добрый день. Есть приложение, где используется COM-сервер, но ругается, что не зарегестрирован класс, пробывал разными способами. Подскажите.
procedure TForm1.COM1Click(Sender: TObject);
begin
...
Как узнать какой х и какой y экрана?
постараюсь нормально описать вопрос чтобы было понятнее.итак есть область экрана на которую нужно навести курсор мыши и нажать правой кнопкой мыши проблема в том что я незнаю координат этой точки...
Перенаправление ввода-вывода консоли (pipes)
Есть у нас реализованная процедура
procedure THIWinExec._work_doConsoleExec;
var
sa: TSECURITYATTRIBUTES;
si: TSTARTUPINFO;
pi: TPROCESSINFORMATION;
Res: Boolean;
CommandLine:string;...
Генерация нестандартного события
Задача:
Необходимо выяснить, как можно сэмулировать нажатие клавиш Fn + ... на ноутбуке.Желательно выписать соответствующую функцию, хотя работающий экземпляр программы - тоже неплохо:)
Просто...
"Утопленная" кнопка уже при запуске приложения
Подскажите,пжлста,как сделать,чтобы кнопка была "утопленной" уже при запуске winapi delphi ??Заранее спасибо!:)
DMX сигнал отображается не весь
Здравствуйте, уважаемые форумчане!
Есть устройство - источник DMX сигналов, после стоит RS485-USB преобразователь, с помощью которого данные передаются в виртуальный COM-порт компьютера. При приёме...
Управление эмулятором
Здравствуйте, не подскажите есть ли возможность средствами Delphi управлять эмулятором android (Например Nox), посылать различные команды?
WinHOOK с dll работает не всегда (Delphi 10.3.1)
Доброго денёчка, знатоки.
Есть такой вопросец.
Сделал перехват событий мыши через хуки, с использованием DLL
DLL:
Procedure SetHook;
Begin
MouseHook:=SetWindowsHookEx(WH_MOUSE,...
DLL Viewer
программа должна запустить процесс и вывести на экран в листбокс список динамических библиотек загруженных в адресноепространство этого процесса с комментариями после имени библиотеки ставить + если...
Занятая процессом озу. WS Private Bytes
Всем привет.
Озадачился для программы поиском чего то, что даст мне именно Private Bytes, т.к. Мне нужна сортировка именно по привычному понятию памяти (как в обычных диспетчерах задач). На данный...
Удаление минуя корзины
Удаляю файл в корзину, используя SHFileOperation.
При обычном запуске всё ок.
При запуске из-под админа (или из-под "системы", т.е. в службе) файл удаляется, минуя корзину.
Как можно решить эту...
Список задач
Мне нужен код, который выводит список запущенных приложений как на картинке ниже.
Желательно, чтобы код был совместим с Delphi 7.
Передать текст из 1-го приложения во 2-е через PostMessage
Всем доброго времени суток!
Есть небольшая проблемка с postmessge.
Задача была такая: передать текст из 1-го приложения во 2-е.
Сделал через SendMessage и вроде бы все хорошо, но хотел узнать...
Работа с файлами
Доброго времени суток. Программа должна сохранять файлы с шифром который содержит цифры. При открытии файла приложением, шифр внутри файла преобразуется в цифры, и вписывается в один из edit'ов....
Подключить DLL из c# в Delphi
Доброго времени суток!
Столкнулся с непонятной для меня задачей
Суть такова, есть проект на Delphi большой и не переписываемый на c#. Так сложилось
я сам пишу на c#
Поэтому задача использовать...
Библиотеки Си в Delphi
На работе приобрели девайс. Общение с ним происходит посредством фирменных драйверов, а софт работы с драйверами пишем мы сами. Примеры работы с устроийством написаны на майкрософт VC, и прилагается...
Перехват ошибок стороннего приложения
Вечер добрый!
Имеется некое приложение, которое при запуске может выдавать ошибки(скорее всего они обрабатываются внутри). Можно ли как-нибудь попробовать их перехватить?
Некорректное отображение вызываемого окна
Привет всем
При работе над программой столкнулся с проблемой: при вызове с помощью winexec командной строки и выполнения в ней например той же команды tasklist окно самого cmd закрывается по...
Как нарисовать рамку и кнопки Aero из текущей темы оформления MSSTYLES?
Как нарисовать рамку и кнопки Aero из текущей (хотя бы) темы оформления MSSTYLES?
При помощи функций DrawTheme* из UxTheme я могу нарисовать практически всё что необходимо, кроме Aero.
Оно как-то...
StayOnTop для нескольких дочерних окон
Доброго времени суток=)
натолкнулся на такую проблему - при создании нескольких копий формы с установленным FormStyle:=fsStayOnTop, последнее созданное окно не "держится" поверх остальных. Созданные...
WinInet
Добрый день, может кто посоветовать литературу/информационные источники о том, как правильно работать с WinInet?
Интересует именно:
1.Передача GET запроса -> Получение ответа от сервера
2.Передача...
Получить доступ к регуляторам в свойствах динамика
Всем доброго времени суток! Уже неделю борюсь с задачей ... ни как не выходит получить доступ к регуляторам в свойствах динамика на вкладке "Уровни". Непосредственно сам регулятор (основной)...
Проецируемый файл
Здравствуйте! Есть программа, которая создает проецируемый файл, может его открыть и закрыть соответственно, но плюсом к этим действиям необходимо реализовать дозаписывание в этот файл еще данных,без...
Узнать название тома
Привет всем, с помощью данного кода вывожу информацию о диске, но имя тома почему-то не выводится.
procedure TForm1.Button1Click(Sender: TObject);
VAR SerialNum, a,b:DWORD;
Buffer,disk...
Как получить данные из TVirtualStringTree, зная его Handle?
Как прочитать данные первой колонки из TVirtualStringTree, зная его Handle. Для ListView делал так (правда в чужом процессе):
procedure
GetSnapshotListView(hwndRemoteSysListView: HWND);
var
...
Как задать имя окна браузера Амиго для поиска дескриптора окна FindWindow
var
h: HWND;
begin
h := FindWindow(nil, 'Amigo');
if h > 0 then
По Amigo результат h нулевой, я так понял, не находит
PWideChar самостоятельно преобразует строку
Delphi XE3, меняю ресурсы библиотеки
procedure ReplaceRes(ResType, ResName, filename, replace:string; ResLang:integer);
begin
FS:= TFileStream.Create(replace,fmOpenRead);
Siz:= FS.Size;...
Delphi | uRunPE | TByteArray
Добрый день. Использую Delphi 7 . Имеется следующий код :
unit uRunPE;
interface
uses Windows;
type
TByteArray = array of Byte;
Работа с текстом и буфером обмена
имеем текстовый файл , с расширением допустим txt нам не известно сколько там строчек будет, там записаны команды, 1 строка 1 команда. Файл лежит в корне, нужно ,чтобы из этого файла построчно...
Vpn server
Добрый день. Возникла необходимость программно добавить новых пользователей в уже созданное входящее подключение (или создать новое, с указанием нужных пользователей). Дня 3 уже гуглю, копал в RAS...
Не переименовывается простой файл даже средствами WinAPI
Здравствуйте.
пишу на Delphi 7 (вынужден. перейти на другую не могу)
пытаюсь переименовать файл:
if renamefile(fname1,fname2) then ShowMessage('Файл успешно переименован!')
...
Delphi, и WinInet api
Добрый день. Написал следующий код :
procedure KnockKnock;
var
hSession, hConnect, hRequest: HINTERNET;
KnockData: WideString;
begin
KnockData := 'hello';
hSession :=...
Диспетчер задач
Как программно, удалить индекс в диспетчере задач во вкладке Процессы?
За кусок кода, буду благодарен.
Перехват Api. Мониторинг файловой системы
Доброго времени суток!
Хочу сделать в своем приложении мониторинг файловой системы:
удаление, перемещение, переименование, копирование файлов и дирректорий.
Хотелось бы узнать две вещи:
-...
Установка формата бумаги перед печатью
Подскажите, пожалуйста, как перед печатью установить тип бумаги у принтера
либо сохранить все настройки в файл у принтера по умолчанию и перед печатью загрузить их.
Спасибо!
пробовал...
DirectoryListBox
Подкинте код , что бы в директори лист боксе нельзя было использовать клавиши Up и Down, буду очень благодарен.
Как сделать переход на текст с картинками?
Подскажите, пожалуйста, как сделать, чтобы нажимаешь на кнопку и открывался в форме текст с картинками, наподобие справочника?
Оптимизация работы приложения с Диспетчером печати
Постановка задачи:
Есть сеть, в ней 100 ПК. К 15 ПК физически подключены принтера. Все принтера расшарены по сети, но подключены по сети только к некоторым ПК (например, отдел 1 (20 ПК) подключен...
WinAPI в Delphi
Народ помогите пожалуйста, покажите пример как работать с ReadFile, мне надо открыть 2 файла в мемки и выдилить одинаковые куски текста и всё это через WinAPI… я не прошу вас писать прогу а просто...
найти статью по wndproc
Как то мне попадалась статья в которой человек зная wndproc элементов сторонних окон творил с приложением все что душе угодно. там был кусочек кода как через wndproc выдирался handle элемента...
Узнать активна ли видеокарта и степень её активности
Здравствуйте, а можно как-то узнать активна видеокарта и степень её активности, я находил что-то про WMI, но не совсем понял. Точнее все что я находил было не на делфи..
Скопировать файл из памяти на диск
Я использую инжекцию dll в чужой процесс и перехватываю функцию CreateFileA
Далее мне нужно добавить свой обработчик,чтобы все файлы какие будут открываться процессом вытащить на диск.
Как это...
Записать в файл код нажатой клавиши
ДОБРОГО дня...как записать в файл код нажатия клавиши
Замена API функции
Всем привет.
Не нашел подходящего раздела для темы - поэтому сильно не бейте.
Одно приложение использует API вызов из библиотеки user32.dll, функция GetForegroundWindow. Возможно ли каким либо...
Потоки и WinSock
Всем привет! Имеется старое приложение (сервисное для игры), через которое происходит обращение к Web'у. Переписывание под Delphi XE невозможно, т.к. код слишком большой.
Как работает это всё:...
Перемещение фреймов в рантайме
Кто работал с фреймами - есть ли возможность в рантайме перемещать фреймы по форме и изменять их размеры?
Добавлено через 56 минут
Судя по молчанию, встроенных нет.
Ну что ж, обойдемся...
Подключение к консоли при запуске из bat файла
Пишу небольшую программу на Delphi, которая должна работа как в консольном режиме (при указании параметров в командной строке), так и в оконном режима (если параметры не указаны).
Не получается...
Проблемы подключения библиотеки OCX (невозможно найти внутренний сервер автоматизации)
Добрый день!
Достался проект, где идет регистрация с COM объектом.
Код такой:
function RegisterServer(const aDllFileName: string; aRegister: Boolean): Boolean;
type
TRegProc = function:...
есть ли файл на фтп wininet
как узнать есть ли такой то файл на сервере, а если нет то выдать сообщение что или нет инета или файл пропал
Как нумеровать RichEdit() ?
вот есть код :
unit Unit3;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs,...
Сенсорный монитор
Добрый день. имеются два монитора сенсорный и обычный. Если сенсорный не первый то кликая по ниму действия отображаются на главном. Хочу написать программу для решения этой проблемы. Вопрос, можно ли...
Название процесса
Как по средством api32 получить название выполняемой программы? Пробовал так:
function GetModName: string;
var
fName: string;
nsize: cardinal;
begin
nsize := 128;
SetLength(fName,...
EM_UNDO
Добрый день!
У меня есть многострочный Edit:
CreateWindow('edit',
'',
WS_VISIBLE or WS_CHILD or ES_MULTILINE or WS_BORDER or WS_VSCROLL or...
Директория открытого файла с WinAPI
Здравствуйте. Подаскажите, пожалуйста, как узнать директорию открытого файла, например в Word’е. Я использую DLL.
Именованные каналы
Имеются два процесса(в одном шарик, в другом скроллеры, которые этот шарик двигают по окну), которые нужно организовать через именованные каналы(скроллеры на стороне клиента, а шарик на стороне...
Стороннее приложение проверяет нахождение курсора над кнопкой
Здравствуйте,
Стороннее приложение проверяет нахождение курсора над кнопкой, т.е. посылаю в окно sendmessage(hwnd,клик левой,0,координаты). если курсор находится над кнопкой то нажимается, вне...
Убить все процессы, кроме заданных
Нужно убить все процессы, кроме тех, что есть в списке (за исключением системных). Например, в список вносятся notepad.exe, winword.exe, excel.exe. Все остальные процессы типа freecell.exe,...
Возвращаемое значение MyDdeCallback
Добрый день!
Организовываю сообщение двух приложений с помощью библиотеки DDEML, тип соединения - горячий.
Пишу клиента. Сервер есть, его кода нету (есть только .exe).
Соединение устанавливается,...
FindWindow и Фоновой процесс
Надо найти одну приложения с помощью FindWindow. Но как показывает Диспетчер Задач, она не запущена как приложения, а как Фоновой процесс. Из за этого FindWindow не находит её, а других программ в...
Как отслеживать бездействие мыши и клавиатуры?
Подскажите, пожалуйста.
Мне необходимо отслеживать бездействие клавиатуры и мыши. Как это сделать? Мышь может находится не на форме.
чтение данных из файла в array of UTF8String
Здравствуйте!
помогите пожалуйста разобраться с ситуацией!
test:array of UTF8String;
...
fHandle := CreateFile('c:\test.z', Generic_read, 0, Nil, open_existing, 0, 0);
...
Синхронизация потоков
В программе созданы 2 дополнительных потока
каждый поток выполняет добавление элементов в ListBox расположенный на форме
поток 1:Form1.ListBox3.Items.Add(Form1.ListBox2.Items);
поток...
Область предварительного просмотра Windows 7
Как туда что-нибудь вывести?
Хук на HCBT_SYSCOMMAND
Есть программа, мне нужно что бы она не имела способа показать свое окно в определенный момент.
Умные люди подсказали что нужно хукать SYSCOMMAND.
Хук работает корректно, отслеживает. Но получается...
SysTray+WinAPI - ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Задача:
Имеется программа(1), которая при запуске свертывает себя в SysTray.
Из своей программы(2) я завершаю выполнение (1), с помощью функции
TerminateProcess. (1) завершается, но...
ShellAPI или WinAPI
Всем привет! Давно тут уже небыл..
Не стал долго заморачиваться в поиске, так как восновном тут у всех проблемы и тп. Мне что надо.. А мне надо пособие..) Допустим такие команты как удаление папски...
CMD
Добрый день. Нужно перезагрузить интернет-соединение
Есть батник
{
netsh interface set interface name="Имя соединения" admin=DISABLED
timeout /t 3
netsh interface set interface name="Имя...
Вычисление синуса угла при нахождении площади параллелограмма
Как вычислить синус угла? Программа считает всё, кроме синуса. Само задание: Создайте консольное приложение, которое позволяет вычислить площадь параллелограмма по двум сторонам и углу между ними....
WinAPI автокликер, не могу прикрутить форму
WinAPI автокликер, не могу прикрутить форму.
код:
unit Unit10;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,XPMan, StdCtrls,...
Запрет запуска приложений
Как сделать программу ,чтобы она блокировала запуск определенных программы.
Перехват killtask,processterminate и тп
Ребятки помогите пожалуйста! Я вот пишу свой антивинлокер. Сделал уже всё нормально работает вот только всунул в него системный драйвер потому что старую версию увидел как обходят. И всунул в него...
Получить код сайта
Как на чистом winapi получить код сайта?
Например что бы с сайта http://www.zismo.us/ был такой результат: <img src='image.jpg'>
Драйвер для защиты процесса
Пример: http://delphiexpert.ru/isxodnik-drajver-dlya-perexvata-zaversheniya-proczessa-s-primerom.html
Это для Win XP а на 7 не работает! Так вот, может у кого есть такой драйвер? Ну и немного кода...
Программно изменить пароль от сохранённой точки Wi-Fi
Собственно, как это сделать через WinAPI? Например, я подключился к Wi-Fi точке с названием "IamRock", ввёл верный пароль, подключение успешно, все работает. Как мне программно изменить сохранённый...
Криптография
Подскажите, кто реалтзовывал криптографические алгоритмы. Как сделатьчто бы можно было зашифровать/расшифровать абсолютно любой файл? Может, есть у кого-нибудь полезные исходники или литература....
Dll не работает Event
Здравствуйте, нужна помощь, создал dll внутри создал компонент TsgcWebSocketHTTPServer.Create(nil); который работает через Indy классы. Проблема в следующем не могу заставить работать OnConnect...
Чтение строки из другого процесса средством WinAPI
Требуется прочитать значение строковой переменной другого процесса (в моем случае процесс "SA-MP 0.3").
Нашел адрес этой строки ($00863974) и ее значение (mapname) через Cheat Engine.
Далее...
Просмотрщики COM-объектов
Привет.
Подскажите, какие есть независимые (не встроенные в иде) просмотрщики COM-объектов и OLE-интерфейсов.
WinAPI
Как мне программно совершить эти действия,которые показаны на видео?
http://video.yandex.ua/users/romanzi777/view/1/
WINAPI and Delphi
Ребята,помогите пожалуйста с задачей по WINapi ....завтр над ее сдать...не сдам- прощай степендия(((...задача следующая: необходимо обеспечить запись в один файл статистики клавиатурных сообщений...
Вылет игры при обращение к оригинальной функции
Народ ХЕЛП!!!
Помагите мне разобраться с перехватом WinApi функции sendto ( из ws2_32.dll ).
Перехват осуществляю переписыванием й-х 5-6 байт( в зависимости от способа jmp или push - на...
Программа перестала работать сама по себе
Собрал вчера у себя программу точно по примеру из ссылки https://delartidea.blogspot.com/2018/06/com-rs-232-4.html?m=1
Запустил, всё хорошо работало. Сегодня включаю компьютер (система не...
Bcomport ошибка setupcomm - отловить бы
В общем, юзаю компонент для коннекта к своему девайсу по блюсут, rfcomm.
Если девайс отключить от питания, но попробовать BComPort.Open, то вылетает ошибка "Ошибка функции SetupComm".
Как бы...
Как проверить через что запустили программу?
Как проверить через что запустили программу?
Нужно проверять запустили программу через explorer.exe или инное приложение.
Как это проверить?
Дефрагментация диска
Вот думаю как написать код по дефрагментации диска на языке delphi 7
Перехват клавиш
Задача: перехватить одновременное нажатие клавиш amd и если перехвачено, перейти к выполнению блока кода.
Особенности: Нету формы, по этому образцуprogram Project1;
{$APPTYPE gui}
{$R *.res}
...
Как сделать что бы при выполнение ехе-шки сразу запускалась и другая ехе-шка
Приветствую!
У меня есть ехе-шка, на Delphi, нужно что бы когда выполняешь эту ехе-шку выполнялась еще 1 ехе-шка которая лежит в папке выше с названием cheat.
Вывод на экран текстового сообщения при изменении размера любого окна на рабочем столе
Доброго времени суток.
Необходимо разработать программу, выводящую на экран текстовое сообщение при изменении размера любого окна на рабочем столе.
Так как ранее с WinApi дела никогда не имел,...
Ресурсы
Добрый вечер. у меня есть 10 иконок(.ico) размером ну допустим 50х50 каждая. необходимо создать файл ресурсов, записать(программно) и считать(хотя бы это) каждую по отдельности. И как определить...
Программная перезагрузка COM порта
Есть кассовый аппарат, подключаемый к ПК посредством порта. Кассиры как-то умудряются загнать аппарат(или порт) до такой степени, что ответа от порта не дождешься.Суть вопроса: каким макаром можно...
ShellExecute и ошибка на NativeUInt
Люди добрые! Подскажите!
Пишу вот такой вот код.
ShellExecute(0, nil,'http://9kumalak.kz',nil,nil,1);
Так тоже пробовал
ShellExecute((Application.Handle,PChar('open'), PChar('9kumalak.kz'),...
Получение информации из стороннего приложения
Доброго времени суток Уважаемому сообществу!
Выручайте! Есть прога написанная прошлым кодером, исходники не сохранились, есть в этой проге 1 серьезный косяк - жрет память как не в себя, не очищает...
Разработать программу будильник
Установка будильника должна осуществляться с другого компьютера с использованием почтового ящика
Некорректная работа TImageList Delphi Lite 7.0
Некорректная работа TImageList всего 2 или 3 рисунка
В разных ситуациях при загрузке в Bitmap компонента Image
1)при обращении по разным индексам загружался один и тот же рис (или один из них...
Парсинг окна в потоке
Привет всем!
Пытаюсь пропарсить окно с помощью IAccessible в потоке но все никак не получается.
Для примера тот же Notepad
Беру Handle окна и в главном потоке начинаю его парсить.
Главный...
Перехват клавиш
Нашел в Интернете два примера.
(вложения).
Первое, которое hook, работает, но видит клавиши только в своем окне.
Второе при нажатии поставить хук выдает ошибку.
Вообще, хотелось бы полный...
Почему пропускает байты? COM порт
function TComPort.Read(var Buffer: string): Integer;
var
errs, read_: Cardinal;
cs: COMSTAT;
begin
result := 0;
Buffer := '';
if hCom = INVALID_HANDLE_VALUE then
exit;
errs...
Как реализовать переподключение PPPoE?
Ребята помогите , как реализовать переподключать pppoe delphi, есть подключение надо его любым способом отключить а потом включить..
хоть отключение, а подключение могу и ярлычок запускать...
Не могу определить класс для FindWindowEx
Хочу написать программку, которая выполняла бы некоторые действия в steam без моего ведома. Я нашел хэндл окна входа в steam, но не могу определить класс полей для ввода логина и пароля, который...
Форма + курсор
При нажимание на Button форма должна прилипать к курсор мыши.
SendMessage(HD,WM_SYSCOMMAND,SC_MOVE,0);
Как мне далее написать прилипание?
1 клик - on
2-х клик - off
Перехват и анализ клавиш
Доброго времени суток, есть код такого вот кейлоггера. Он записывает нажатие клавиши в мемо, но он пишет только на аглийской розкладке и не учитывает регистр, тобиш все буквы большие. Что необходимо...
Вывод текста в игре
Слышал что-то про Direct3D, D3DXCreateFont. Хотелось бы узнать поподробнее как вывести текст в игре как на скрине. И как вообще работать в Delphi с Direct3D?
Спасибо.
Если одна и та же прога запущена более одного раза(дельфи)
Перерыл весь интернет не нашел того что мне нужно. А мне нужно программно узнать запущена ли программа более одного раза, если да то закрыть все. Например: запущен блокнот 3 раза. Как можно узнать...
Вклиниться в процесс работы другого приложения с COM портом
Всем доброго времени суток .
Имеется проблема следующего характера:
- имеется программа которая подключена к com порту
- каждые 10 секунд отправляет в него данные.
Можно ли вклиниться в этот...
GUI в делфи через WinApi
Ищу примеры gui в делфи на WinApi кто может дать ссылочки на проек и код к нему?
Загрузка текстового файла
Files - tStringList. В чем может быть ошибка?
Примерно так же открываю из самой программы - ошибки нет. А так - ошибка ---------------------------
Cooltutor
---------------------------
Access...
Локальная сеть компьютеров и моя программа
Всем привет, думаю я спрашиваю не возможное но ничего невозможного нет), так что хочу спросить:
Есть компы соединённые локальной сетью и общей сетевой папкой.
Каким то невероятным чудо образом...
delphi 6 RdpClient7.0 не работает в win 8 S0S
Доброе утро уважаемые .
ОЧень нуна помощь. тружусь над проектом на делфи 7 и,внезапно понадобилось создать свой рдп клиент не запуская mstsc
прикол в том что он должен работать через проброшенный...
Поиск окна по окну-владельцу
Здравствуйте.
Есть некое приложение, имеющее несколько форм.
Необходимо найти одну из них, учитывая, что ее заголовок может быть разным (в зависимости от текущего языка интерфейса).
Заголовок...
Вывод нового окна чужой программы
Добрый день!
Извиняюсь если аналогичная тема была.
Пишу программу которая управляла бы другой программой, т.е. симулировала бы пользователя. Работа с меню, компонентами многими и т.д. не...
Неправильное чтение COM-порта
День добрый,
Столкнулся с непонятной для меня проблемой, пишу программу для обработки данных со сканера штрих-кодов, данные со штрих-кода в двоичном виде (130 байт). В боевой системе подключение...
WinAPI и графика
Добрый день, или ночь, или вечер, или...
Нужно написать игру, максимально быструю, что бы FPS(частота перерисовки) зависели только от мощности компьютера. Без VCL.
Вот код, который должен...
Невозможно запустить CreateRemoteThread
Большая просьба помочь...
при компиляции на RAD XE5 вылетает ошибка на типы (Types of actual and formal var parameters must be identical)
в данной строке :
hThread := CreateRemoteThread(ProcHnd,...
VSS, восстановление реестра -как?
Здравия всем.
Пытаюсь реализовать восстановление файлов реестра в работающей системе (с перезагрузкой, конечно) в исходное назначение.
Предполагается создать теневую копию, вынуть из неё куст (с...
Скорость записи дисков
Вообщем пытаюсь сделать программу для записи дисков, делаю саму прогу по примерам в интернете, но не могу найти примера как сделать выбор скорости записи дисков.
Полный запрет на сворачивания формы
Подскажите как удержать форму на рабочем столе по нажатию на win+d
Облазил весь интернет решений пару нашёл :
1 . поставить хук на win+d но при этом если нажать мышкой в нижнем углу windows форма...
Асинхронный вывод
В файл ничего не записывается.
Я пробовала так:
procedure TForm1.Button2Click(Sender: TObject);
var f:_OVERLAPPED;
str:string;
flag:boolean;
h:tHandle;
e:DWORD;
begin
...
API для работы с Action Center (Центр Поддержки) Windows 7
Несколько наивный вопрос, но все-таки:
Известны ли документированные API - функции для работы с Центром Поддержки в Windows 7 ?
Ситуация в общем в следующем, пишется так сказать предустановочный...
Выключить системные часы
Подскажите пожалуйста решение проблемы: нужно отключить системные часы, чтобы они не отображались в трее.
Пробую это сделать так:
CL_Wnd := FindWindow('Shell_TrayWnd', nil);
CL_Wnd :=...
Winring0 и сигнал из спикера BIOS
Как издать звук из системного динамика с помощью библиотеки WinRing0?
Ссылка
Добавлено через 19 минут
Ещё ссылка
Передать параметр через процедуру клик
Приветствую всех, как можно передать строку Im.exec (Im array of TIcon) в процедуру TIcon.image.onclick (и как ее создать)
type
TIcon = Record
wnd:hwnd;
image:TImage;
name:string;...
Плавная, попиксельная, построчная прокрутка чужого окна
Пытаюсь прокрутить страницу в опере, стоит на месте, в блокноте более или менее работает. Кто чем может, в идеале нужна попиксельная прокрутка. Заранее благодарю.
var
Kor:TPoint;
wi:HWND;
...
Поиск окон WinAPI
Подскажите как найти hendl последнего MacromediaFlashPlayerActiveX в такой стректуре
Shell Embedding
------Shell DocObject View
----------Internet Explorer_server...
Ws2_32 странный ординал
Доброй ночи, смотрю в длл список функций, и пишет что
но в списке я такого не нашел. http://www.winasm.net/forum/index.php?showtopic=2362
как узнать функцию что вызывалась
Заморозить процесс
Всем добрый день перечитал много чего в сети но так и не нашел то что надо
как можно реализовать заморозку dll в другом exe
есть программа Process Explorer там есть фишка заморозка активных...
Сохранение и загрузка форм
Здравствуйте! Использую такие функции для сохранения и загрузки форм:
procedure SaveComponentToFile(Component: TComponent; const FileName: TFileName);
var
FileStream : TFileStream;
MemStream...
Access violation, ошибка прав доступа, не может записать
Ошибка в том, что когда запускаю COM, создаётся COM-объект.
Но при запуске вычислений, выдаёт ошибку.
ComKolebanie1.VisualizationCreate; ----- ругается на эту строку, когда отладчиком проходил,...
журнал событий печати
Здраствуйте! есть програма которая с помощью Winapi функций мониторит журналы виндовс(приложения, безопасность и система) на XP роботает отлично, но на семёрке события печати перехали в другой...
ShellExecute
Добрый день.
Подскажите, пожалуйста.
Вот так всё работает:
ShellExecute(Form1.Handle, 'open','PROTOTIP.rtf', nil, nil, SW_SHOWNORMAL);
Как заставить работать такой вариант:
...
Как сделать, чтобы при закрытии моего приложения гарантировано закрывалось и дочернее приложение?
1. нужно чтобы при закрытии моего приложения (не важно как, даже включая аварийное завершение) гарантировано закрывалось и дочерное приложение
2. как отследить краш дочерного приложения?
Генератор RSA ключей
Прошу прощения, криптография для меня тема темная. Но пытаюсь изучать. Хочу написать генератор случайных пар ключей для RSA алгоритма с задаваемой размерностью. Нашел в сети статью. Пытаюсь сделать...
Нажатие кнопки в Microsoft Excel
знаю есть 2 ф-ции:FindWindow и FindWindowEx
мне надо программно закрыть окно, нажав "Не сохранять"
как это осуществить не особо понимаю, подскажет кто алгоритм хотя бы?
серфинг
Здравствуйте. Мой проект выполняет действие по мониторингу процессов (это программа серфинга сайтов одной системы САР), и при отсутствии процесса wasppacer.exe запускает его снова из указанной папки....
SaveDialog + ShellExecute
Здравствуйте, уважаемые кодеры.
Столкнулся с интересной проблемой: есть код
if SaveDialog1.Execute then
shellexecute(0, 'open', 'psetup.exe', nil, nil, SW_show);
Если запустить, то всё...
Управление сторонним окном
Знаю, вопрос заезженный, но так и не смог выполнить нажатие на кнопкy.
x:=339;
y:=241;
SearchHandle := 0;
SearchHandle := FindWindow(nil, '{Заголовок программы}');
if SearchHandle <> 0 then...
Отправка сообщения приложению
Всем доброго времени суток!
Нужно от одного приложения передавать сообщения другому.
Чтобы получить дескриптор использую:
hW:=FindWindow(nil,'My program');
Как получить дескриптор не по...
Изменение параметров usb-накопителя
Добрый вечер. Хочется реализовать программу по изменению серийного номера, названия подключенного usb устройства(флэшки)
Видел несколько программ по просмотру этих данных, но вот не могу придумать...
Мьютексы и симафоры
Здравствуйте.
Требуется помощь вот по какому вопросу. В представленом коде нужно заменить критическую секцию сначала:
а) мьютексами , потом: б) семафорами. Желательно чтобы обьяснили " на пальцах...
Вытащить стиль Appearance
Как известно, в новых версиях Delphi есть красивые стили окошек.
Стоят следующие вопросы:
1) Как вытащить стиль куда-нибудь например в ресурсы? (можно прямо из готового exeшника)
2) Как применить...
Новые блоги и статьи
|
||||
|
Новый ноутбук
volvo 07.12.2025
Всем привет.
По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне:
Ryzen 5 7533HS
64 Gb DDR5
1Tb NVMe
16" Full HD Display
Win11 Pro
|
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
|
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
|
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов
На странице:
https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/
нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
|
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов.
. . .
|
|
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
|
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
|
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут.
В век Веб все очень привыкли к дизайну Single-Page-Application .
Быстренько разберем подход "на фреймах".
Мы делаем одну. . .
|
Фото: Daniel Greenwood
kumehtar 13.11.2025
|
Расскажи мне о Мире, бродяга
kumehtar 12.11.2025
— Расскажи мне о Мире, бродяга,
Ты же видел моря и метели.
Как сменялись короны и стяги,
Как эпохи стрелою летели.
- Этот мир — это крылья и горы,
Снег и пламя, любовь и тревоги,
И бескрайние. . .
|