Есть небольшая программа, в которой есть текстовые поля. В них нужно вводить значения.
Значения всегда одинаковы.
Например - есть поле Организация. И туда всегда надо вводить "ООО Вектор".
Ввел значение в текстовое поле, нажал кнопку далее, ввел значение в другое поле и т.д.
Программу нужно запустить на большом числе компьютеров.
То есть каждый раз вводить в поле организация "ООО Вектор" - накладно. А таких полей там много.
Вставлять значения из блокнота быстрее, но всё равно не то...
Пробовал ResEdit и аналоги. Добавлял нужный текст в поля, но после сохранения программа вылетала.
Т.е. эти утилиты что то портят в программе.
Вот пример кода из ResEdit.
105 DIALOGEX 0, 0, 248, 93, 0
STYLE DS_SETFONT | DS_MODALFRAME | DS_FIXEDSYS | WS_POPUPWINDOW | WS_VISIBLE | WS_CAPTION
CAPTION "Username And Password"
FONT 8, "MS Shell Dlg", 0, FALSE
{
EDITTEXT 1007, 61, 34, 180, 14, ES_AUTOHSCROLL
EDITTEXT 1009, 61, 52, 180, 14, ES_PASSWORD | ES_AUTOHSCROLL
DEFPUSHBUTTON "OK", 1, 132, 71, 50, 14, WS_DISABLED
PUSHBUTTON "Cancel", 2, 191, 71, 50, 14
LTEXT "Enter name.", 1040, 7, 7, 226, 23
LTEXT "&Name:", -1, 7, 34, 42, 13
LTEXT "&Password:", -1, 7, 53, 40, 12
}
Нужно в EDITTEXT написать свой текст.
В Delphi есть OLE. Возможно ли как-то при появлении диалога с полем EDITTEXT (как я понял идентификатор поля 1007) вставлять туда значение?
Как в чужой программе заполнить поля нужными значениями?