Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


Arkan ©   (2002-11-06 15:32:00) 

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


Alex4444444444   (2002-11-06 23:49:00) [1]

Ni hrena sebe opechatka!
uses Messages;


Arkan   (2002-11-06 22:39:00) [2]

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


atmospheric   (2002-11-06 18:26:00) [3]

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


han_malign   (2002-11-06 17:42:00) [4]

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


Arkan   (2002-11-06 17:37:00) [5]

Возвращаясь к первому вопросу:
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?


KoluChi   (2002-11-06 16:45:00) [6]

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


DieHard   (2002-11-06 16:41:00) [7]

см. ParamStr


Arkan   (2002-11-06 16:39:00) [8]

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


Arkan   (2002-11-06 16:38:00) [9]

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


Arkan   (2002-11-06 16:36:00) [10]

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


Arkan   (2002-11-06 16:35:00) [11]

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


Skier   (2002-11-06 16:24:00) [12]

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


Arkan   (2002-11-06 16:23:00) [13]

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


TTCustomDelphiMaster   (2002-11-06 16:18:00) [14]


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


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


Arkan   (2002-11-06 16:05:00) [15]

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


Игорь Шевченко   (2002-11-06 15:59:00) [16]

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


Ru   (2002-11-06 15:56:00) [17]

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

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

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


Arkan   (2002-11-06 15:55:00) [18]

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


Юрий Федоров   (2002-11-06 15:50:00) [19]

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


Юрий Федоров   (2002-11-06 15:34:00) [20]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо