Орешник Мастеров DELPHI
Орешек знанья тверд,
и все.
(вместо эпиграфа)
Трудны и тернисты пути знания. Блуждая по ним, нельзя обойтись без курьезов. Почему же не попытаться использовать их для поднятия настроения, для учебы?
В нашем "орешнике" мы попытаемся собирать такие, на наш взгляд курьезные вопросы и ответы из форумов, которые могут вызвать Вашу улыбку.
Улыбайтесь, господа!
(к/ф "Тот самый Мюнхгаузен")
Страницы:
Как добавить граафический файл к иксишнику (2)
Как добавить граафический файл к иксишнику
Нет это я знаю....
у меня фишка такая:Image1.loadfromfile:=('d:\...\...');Вот и в зависимости от ситуации туда грузится определенная картинка и как мне их впихнуть??
Как отклюить в процессе работы программы определенный пункты меню
Как в процессе работы программы определенный пункт MainMenu1 отключить?
Ответ:
Enable?
да
ну И?
Как обнулить переменную ?
Subj.
Ответ:
i:=0;
как её совсем очистить ?
Как создать файл собственного типа?
Как можно создать собственный тип файла?
Народы помогите как зная ехе-ху найтие его полный путь
Народы помогите как зная ехе-ху найтие его полный путь??
Типа отлавил япо хендлаку окна его ехсешника а как путь к нему полный хз хелпаните кто сможет.
За ранее спасиба
Ответ:
Есть угарная фишка в винде, toolhelp32 называется,
дАбавляешь в узес tlhelp32
пишешь CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0)
жмакаешь ctrl+F1, тама описаловка появится типа читаешь, патом давишь на кнопку "group" тоже читаешь, по хендлаку окна узнаешь ProcessId, вот такая вота функция паможет GetWindowThreadProcessId, патом перебираешь все что CreateToolhelp32Snapshot Зделала, в tagMODULEENTRY32 есть прикольная штука szExePath, ну как ? хелпанул?
Как в цикле прогнать все компоненты приложения?
Столкнулся с ситуацией когда нужно в цикле прогнать все компоненты приложения, визуальные, невизуальные.
Также хотел спросить можно ли прогнать в цикле все переменные?
Ответ:
А куда прогнать? И за что?
Ответ:
За пределы приложения, очевидно, прогнать...
Ответ:
Компоненты не сложно.
for i := ComponentCount - 1 downto 0 do ВонОтсюда(Components[i])
Вот с переменными проблемы. Тут хороший вышибала нужен :)
IP
Здравствуйте!
Как мне запихать в переменую nickname свой ip ??? (пример: 192,168,0,2) ???
Спасибо...
Ответ:
переменная_в_которую_следует_запихать := Socket.RemoteAddress;
Ответ:
nickname := '192,168,0,2';
спасибо
а что за Socket у меня его выделяет =(
Ответ:
тебе это вообще-то зачем нужно ? для определения/фиксации адреса клиента сервера ?
ну так я и говорю тебе : 2-й параметр любого события объекта TServerSocket и есть тот самый Socket, вызовом св-ва RemoteAddress которого ты получишь инф-цию об IP-адресе клиента, "породившего" на стороне сервера данное событие !
Извини но я не понимаю напиши плз код
Ответ:
чего не понимаешь ? что такое процедура обработки события и что такое параметр процедуры ?
Короче смотри, пишу:
nickname := Socket.RemoteAddress;
выдает:
[Error] main.pas(113): Undeclared identifier: 'Socket'
В чем ошибка я не понимаю =(
Ответ:
На скока орех потянет ?
Непонял
Ответ:
Такая ошибка выдается тогда, когда идентификатор не найден ни в одном из подключенных модулей. Делай вывод.
Хехе, извините за упорство, но все же как мне сделать чтобы он был???
Ответ:
Ну если не понял, то надо включить в uses все необходимые модули.
Страницы: