Маша заболела ангиной!

← →
Arkan © (2002-11-06 15:32) [0]

Здравствуйте! Подскажите пожалуйста, как мне сделать следующее. Запускаю я блокнот, а потом мне надо передать в него(чтобы в текстовом поле появилось) строку "Маша заболела ангиной!". Подскажите, как?

← →
Юрий Федоров © (2002-11-06 15:34) [1]

Самое простое - создать текстовый файл Temp папке со строкой,
и запустить блокнот с параметром <имя файл>

← →
Юрий Федоров © (2002-11-06 15:50) [2]

Найди его Handle и отправь сообщение

← →
Arkan © (2002-11-06 15:55) [3]

поподробнее не расскажите. если с кодом, так я вообще буду рад, т.к. начинающий...

← →
Ru © (2002-11-06 15:56) [4]

findwindow - найти родительское окно
findwindowex - найти дочернее окно

Str:="Фигня всякая";
NHandle:=findwindow(nil,"notepad");
WHandle:=findwindowex(Nhandle,nil,"Memo",nil);
SendMessage(WHandle,WM_SETTEXT,Length(Str),integer(Str));

если ошибся то хэлп тебе в помощь Ж:)

← →
Игорь Шевченко © (2002-11-06 15:59) [5]

Бедная Маша, то она туберкулезом болеет, то ангиной...
Жалко Машу...щас раплачусь...

← →
Arkan © (2002-11-06 16:05) [6]

2Ru
Спасибо.
2Игорь Шевченко
Не волнуйся, она поправится...

← →
TTCustomDelphiMaster © (2002-11-06 16:18) [7]

>
> Игорь Шевченко © (06.11.02 15:59)
> Бедная Маша, то она туберкулезом болеет, то ангиной...

Интересно, а она на ВИЧ проверялась?

← →
Arkan © (2002-11-06 16:23) [8]

Да, и ещё вопросик: например, я переассациировал расширение *.xls на свою прогу. Теперь как мне сделать так, чтобы при открыти exel файла он запускал мою прогу, которая открывала бы уже Excel с этим файлом. ВСе. Может, я выразил сумбурно, но надеюсь, что меня поймут.

← →
Skier © (2002-11-06 16:24) [9]

>Arkan
Запускай Exel сам
см. CreateOleObject(...)

← →
Arkan © (2002-11-06 16:35) [10]

Возможно, я неясно выразился. Мне надо провести учёт запускаемых файлов. Я понимаю, что гораздо проще поставить ловушку, но мне надо именно так, через переассоциацию. Вопрос в том, как мне отловить имя и путь запускаемого файла, а потом запустить Exel с этими параметрами.

← →
Arkan © (2002-11-06 16:36) [11]

Думик Дмитрий

← →
Arkan © (2002-11-06 16:38) [12]

Возможно, я неясно выразился. Прога должна вести лог эксел файлов. Мне надо отловить имя и путь запускаемых эксел файлов, а потом запускать эксел с этими параметрами. Довольно просто сделать через ловушку, но мне надо именно так.

← →
Arkan © (2002-11-06 16:39) [13]

сорри за спам. случайно

← →
DieHard © (2002-11-06 16:41) [14]

см. ParamStr

После переассоциации твоя программа будет запускаться с параметрами. Смотри РaramStr(1) - это будет имя запускаемого файла. Затем запускай Excel.exe с этим же параметром.

Возвращаясь к первому вопросу:
Str:="Фигня всякая";
NHandle:=findwindow(nil,"notepad");
WHandle:=findwindowex(Nhandle,NULL,"Memo",nil);
SendMessage(WHandle,WM_SETTEXT,Length(Str),integer(Str));
Выдает компилятор, что
Undeclared identifer "NULL"
Undeclared identifer "NULL"
Как мне их declared?

nil, или 0, в зависимости от типа параметра (NULL - С-шный макрос)

Ну, а может - ты открываешь .xls пишешь логи(каунты), а потом делаешь из своей программы ShellExecute (пускаешь ексел со с параметром этого файла)...

сорри, я опечатался,
вторая строка: Undeclared identifer WM_SETTEXT.

← →
Alex4444444444 (2002-11-06 23:49) [20]

Ni hrena sebe opechatka!
uses Messages;

Маша заболела ангиной! Найти похожие ветки