Уважаемые эксперты ответьте пожалуйста на вопрос по Delphi: Как написать что либо к примеру на канве взяв шрифт из файла? Я инсталлирую AddFontResource-ОМ но потом как задать Canvas.Font.Name , если не занешь его имени, надо определить что-ли?
Добрый день, DimaS! Да, тебе надо знать имя шрифта! А как по другому? Ответ отправлен: 11.12.2003, 18:52 Отправитель: CJ Отвечает sir henry
Доброе время суток, DimaS! Если у Вас какие-то дополнительные шрифты TrueType, то прежде всего их надо установить в системе. Обычно у шрифта есть имя :). Если он совсем без имени, как-же им пользоваться тогда? Ответ отправлен: 11.12.2003, 07:06 Отправитель: sir henry Отвечает Boriss
Доброе время суток, DimaS! В приложении смотри, как это делается. Так что ИМЯ ШРИФТА знать надо ... (Пример взят из Delphist's FAQ http://www.forum.vingrad.ru/index.php?act=SF&f=32)
Приложение: Ответ отправлен: 11.12.2003, 10:06 Отправитель: Boriss
Вопрос № 1169
Я написал прогу на Delphi, когда у меня стоял XP. Прога эта в процессе работы запускает консольные и DOS приложения. Вот проблемма, когда в миллениуме консольные и DOS приложения завершаются, то окно остается а в заголовке пишется "Сеанс завершен". Это окно висит, а моя прога ждет пока оно закроется и продолжит работу. В XP DOS проги сами закрытаются. Че делать как их убрать. Я пытался и процесс убить и все, не помогает. Помогите... Я скинул код, процедуры которая запускает и ждет завершения ...
Здравствуйте, DimaS! ХМ.. Думаю ты можешь попробывать использовать CloseWindow. Просто если знаешь заголовок окна, делаешь GetDC, а потом вышеуказанный CloseWindow! Ответ отправлен: 11.12.2003, 18:48 Отправитель: CJ Отвечает fC
Доброе время суток, DimaS! Если запускаемое DOSприложение заранее известно, то автоматического закрывания окна можно добиться следующим образом: Вызываем свойства файла -> Вкладка «программа», и установить галочку на «закрывать окно по завершении сеанса работы». Удачи! Ответ отправлен: 11.12.2003, 01:23 Отправитель: fC Отвечает sir henry
Приветствую Вас, DimaS! Если для той или иной программы доса нет своего ярлыка, то она запускается, используя досовский "умолчальный" ярлык. В милениуме он, по-моему, называется default.pif (но возможно я и ошибаюсь, однако расширение у него точно pif). Отредактируйте свойства этого ярлыка так, чтобы программа закрывалась после выполнения. Ответ отправлен: 11.12.2003, 07:13 Отправитель: sir henry
Вопрос № 1170
Сколько SP вышло к Delphi 7.0. Может быть дадите варезные линки? :) Только не с www.borland.com (ru).
Доброе время суток, ToxA! В любом случае исходников не получишь, только дизассемблированный код. DeDe – рулез 4ever! :) Ответ отправлен: 11.12.2003, 19:37 Отправитель: fC Отвечает CJ
Добрый день, ToxA! Лично мне нравиться DeDe! Качай от сюда http://reversing.kulichki.ru/files/dizas/DeDe.rar! Ответ отправлен: 11.12.2003, 18:53 Отправитель: CJ Отвечает sir henry
Приветствую Вас, ToxA! Перевести ее обратно в язык Дельфи нельзя (да и в какой-либо другой язык высокого уровня тоже :). Единственное что можно сделать, это перевести машинный код в ассемблерообразный, но боюсь Вам это не понравиться :)). Ответ отправлен: 12.12.2003, 10:42 Отправитель: sir henry
Вопрос № 1172
Здраствуйте эксперты. Есть 2 формы в программе-в обоих TSaveDialog на форме.Вызов как обычно savedialog.execute,но при выборе ветки TTreeView(№2 форма)-там делаю динамически типа(подправлен) TStringGrid,отображает,но после этого не работает TSaveDialog(в обоих формах)-делал динамически TSaveDialog-тоже-на курсоре на мгновение появляется часики,но окно так и не появляется. SaveDialog1.Handle(read only)-всегда нуль,даже если работает. Может дело в том ,что использую свой класс TStringGrid,но не понятно почему он влияет на TSaveDialog,кроме предков там нечего не пересекается... Куда копать? Спасибо
Доброе время суток, AllDer! По-видиому, надо знать что за свой TStringGrid, чтоб ответить. И что значит, "не работает TSaveDialog"? И как динамически создаете? Может не закрыв прежние? Ответ отправлен: 11.12.2003, 17:16 Отправитель: Boriss Отвечает fC
Приветствую Вас, AllDer! Согласен с предыдущим ответом. Без пол-литры не разобраться :) Т.е. без исходников. Ответ отправлен: 11.12.2003, 19:13 Отправитель: fC Отвечает sir henry
Добрый день, AllDer! Я так понял, что у Вас один TSaveDialog на две формы? Тогда, Вам нужно в раздел USES той формы, где нет диалога добавить юнит формы, где он есть: Unit MyForm1; {Здесь расположен YSaveDialog} ..... end.
Unit MyForm2; {Здесь TSaveDialog'а нет} Uses ....., MyForm1; ..... end. ************** Если все это у Вас есть, то попробуйте при вызове TSaveDialog использовать конструкцию Try ... Except. И отследить, какие параметры передаются. Возможно Вы используете какие-то нереальные параметры. Ответ отправлен: 12.12.2003, 09:02 Отправитель: sir henry
Форма отправки вопроса
Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+
или отправлять вопросы с сайта по адресу:
http://rusfaq.ru/cgi-bin/Message.cgi.