Вверх ↑
Этот топик читают: Гость
Ответов: 3
Рейтинг: 0
#1: 2011-08-01 03:14:28 ЛС | профиль | цитата
Здравствуйте.

Подскажите пожалуйста, как узнать имя (имя файла) запущенной программы (тупо звучит ). Объясню сразу чтобы меньше вопросов было. Допустим есть программа написанная на hiasm. Мы её запускаем и она должна узнать своё имя. Надеюсь всё понятно. Заранее спасибо.
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#2: 2011-08-01 03:26:42 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 07:42:23
карма: 0

0
Ответов: 1058
Рейтинг: 76
#3: 2011-08-01 03:46:44 ЛС | профиль | цитата
[flood]
qwerty писал(а):
она должна узнать своё имя.

Это же как надо "напрограммится" чтобы забыть имя собственноручно созданной программы?
code_24768.txt
Без обид, не здержался
[/flood]

карма: 0

0
файлы: 1code_24768.txt [771B] [132]
Ответов: 3889
Рейтинг: 362
#4: 2011-08-01 08:37:21 ЛС | профиль | цитата
tom-it, так ему, вроде, нужно было имя файла
qwerty писал(а):
узнать имя (имя файла) запущенной программы

qwerty, для своей программы проще делать так:

Add(MainForm,8206928,322,105)
{
Caption="Гадя Петрович Хренова"
Point(Handle)
link(onCreate,12182008:doString,[])
}
Add(Message,3912304,406,119)
{
}
Add(FormatStr,12182008,364,119)
{
DataCount=1
Mask="Папа! Ты меня не помнишь ?!
Это же я,
%1 !"
link(onFString,3912304:doMessage,[])
link(Str1,11994668:AppFileName,[])
}
Add(Application,11994668,364,63)
{
}
------------ Дoбавленo в 08.22:
или даже так:

Add(MainForm,8206928,322,98)
{
Caption="Гадя Петрович Хренова"
Point(Handle)
link(onCreate,16477370:doPart,[])
}
Add(Message,3912304,448,112)
{
Caption="Весточка от кровинки"
}
Add(FormatStr,12182008,406,112)
{
DataCount=1
Mask="Папа! Ты меня не помнишь ?!
Это же я, %1 ! "
link(onFString,3912304:doMessage,[])
}
Add(Application,11994668,364,63)
{
}
Add(FilePartElm,16477370,364,112)
{
link(onPart,12182008:doString,[])
link(FileName,11994668:AppFileName,[])
}
------------ Дoбавленo в 08.37:
А у любого другого приложения имя узнаём примерно так:

Add(MainForm,8206928,560,238)
{
Height=12
Caption="Ищейка"
BorderStyle=4
Point(Handle)
link(onCreate,265935:doPopup,[])
}
Add(WinInfo,5645610,371,238)
{
Point(ProcessID)
link(onWinInfo,10869016:doFindID,[(415,244)(415,251)])
link(Handle,11222117:Handle,[(377,226)(391,226)])
}
Add(EnumProcess,10869016,427,238)
{
TimeOut=1
Point(doFindName)
Point(FullPath)
Point(onFind)
link(ID,5645610:ProcessID,[(433,226)(412,226)(412,282)(391,282)])
link(onFind,16477370:doPart,[(467,251)(467,244)])
}
Add(MouseEvent,11222117,371,182)
{
Point(Handle)
}
Add(Timer,1408884,329,238)
{
link(onTimer,5645610:doWinInfo,[])
}
Add(FormatStr,12182008,518,238)
{
DataCount=1
Mask="Под курсором мыши - окно приложения %1."
link(onFString,8206928:doCaption,[])
}
Add(FilePartElm,16477370,476,238)
{
link(onPart,12182008:doString,[])
link(FileName,10869016:FullPath,[(482,226)(464,226)(464,281)(440,281)])
}
Add(WinTools,265935,616,245)
{
link(Handle,8206928:Handle,[(622,233)(600,233)(600,280)(566,280)])
}


карма: 1

0
Ответов: 1058
Рейтинг: 76
#5: 2011-08-01 09:54:43 ЛС | профиль | цитата
1nd1g0 Какой вопрос = такой ответ.
qwerty писал(а):
узнать имя (имя файла) запущенной программы

qwerty писал(а):
запускаем и она должна узнать своё имя


Ктото на форуме писал, правильно сформулированный вопрос содержит 90% ответа.
Как по мне вопрос не совсем корректен.

карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#6: 2011-08-01 12:51:40 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 07:42:23
карма: 0

0
Ответов: 313
Рейтинг: -9
#7: 2011-08-01 21:04:41 ЛС | профиль | цитата
Кстати знаю не сёда лезу, но ещё такой вопрос, как можно запустить процесс от пользователя sistem со всеми привилегиями, чтоб его через деспетчер задачь убить нельзя было, ну или как замаскеровать процесс что его или вообще видно небыло или имя другое имел, а то дети умные пошли от моего радидетельского
контроля быстренько избавятся!!!
карма: 0

-1
Голосовали:hitman249
Гость
Ответов: 17029
Рейтинг: 0
#8: 2011-08-01 21:16:40 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 07:42:23
карма: 0

0
Ответов: 5446
Рейтинг: 323
#9: 2011-08-01 23:45:11 ЛС | профиль | цитата
mrvitya, с такими запросами - на специализированный сайт. Заодно, как модератор, даю последнее китайское: за такие вопросы буду банить. И банить. И банить. Пока не уймёшься.
карма: 1

2
Голосовали:tom-it, hitman249
Ответов: 1058
Рейтинг: 76
#10: 2011-08-01 23:49:12 ЛС | профиль | цитата
[flood]iarspider Давно пора, объяснить прямо в лоб. А то все никак не угомонится, и всяческие намеки не доходят.[/flood]
карма: 0

0
Ответов: 313
Рейтинг: -9
#11: 2011-08-02 10:34:04 ЛС | профиль | цитата
Да блин вы меня закалебали, сначала регаться заставляют теперь помочь нехотят будто я вирус, делаю, вот ябы посмотрел какбы бисились если бы родительский контроль поставили, а ваши дети его закрили через деспетчер и играли сколько угодно, чтож вы за вредены? На счёт бана я особо небоюсь, а на счёт вируса, у меня есть вирус который я сделал, но толку эт этого мало и он досихпор некому непопал на комп даже врагам, обидно думал тут помогут с некоторыми вищами разобраться обьяснят, но нет!!!
карма: 0

0
Ответов: 3889
Рейтинг: 362
#12: 2011-08-02 10:53:21 ЛС | профиль | цитата
mrvitya,[flood] да, школьнику, чьи дети уже способны снять его родительский контроль, явно нелегко пришлось в жизни.
Вы слишком наивны, при желании ни перерегистрация, ни гостевой доступ, ни смена адресов не спасут Вас от расплаты за засорение форума, просто Вами никто пока серьёзно не занимался. Как в плане доступа к сайту, так и в юридическом. Если Вы умудритесь реализовать хотя бы часть озвученных запросов на практике, Вы уже попадаете под уголовную статью, и малолетство не спасёт, не обольщайтесь. У Вас два пути поумнеть - перечитать рекомендации опытных людей и последовать изложенному, или познакомиться со службой собственной безопасности провайдера и проверить на своей шкуре работу полиции. На такого умника первые свалят все проблемы с сетью, а вторые - с радостью повесят похожий нераскрытый электронный криминал по району за последний квартал. Удачи, - понадобится. [/flood]
карма: 1

1
Голосовали:tom-it
Ответов: 313
Рейтинг: -9
#13: 2011-08-02 13:49:00 ЛС | профиль | цитата
Да дети может у меня хотят программу купить знакомые!!!
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#14: 2011-08-02 14:44:48 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 07:42:23
карма: 0

0
14
Сообщение
...
Прикрепленные файлы
(файлы не залиты)