|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#16
|
||||
|
||||
"поищи в инете шрифты немецкого языка и все-го то проблем! Установи у нужного компонента этот шрифт и используй метод moo2k"
Я не знаю как установить и про метод moo2k никогда не слышал |
#17
|
||||
|
||||
Всё работает
Пришлось сначала записать все строки в текстовый файл немецким шрифтом (в обычном Блокноте, но файл надо сохранить как Unicode), и оттуда уже читать
PS: Приложение создано как CLX Application, чтобы тип TCaption был WideString PPS: Ты кстати просил ссылки на справку по функциям и процедурам, что скачать можно, вот: http://www.delphiworld.narod.ru/dw.html http://www.drkb.ru/ это должно быть у всех! Последний раз редактировалось Rokuell, 25.12.2007 в 00:33. |
#18
|
||||
|
||||
Спасибо !
Спасибо !
Я бы такой код не написал(по крайней мере с такими знаниями, какие имею сейчас). Пример хороший ! http://www.delphiworld.narod.ru/dw.html -это есть http://www.drkb.ru/- а это качаю |
#19
|
||||
|
||||
Пожалуйста!
Думаю тебе стоит найти в инете и скачать(ну или просто купить в магазине, как это сделал я) книгу "С. Бобровский Delphi 7 Учебный курс" издательство Питер - книга реально помогает за 2 месяца научиться кодить, т.е все основы и описание компонентов и т.д... А дальше уже можно просто эксперементировать - я ведь тож не знал, как эти буквы отобразить, а т.к редактор в Delphi их не поддерживает, вот и пришлось из файла читать и т.д - эксперементируй! |
#20
|
||||
|
||||
Можно вопрос ?
Как это всё правильно скопировать в буфер
примерно такой код : Код:
... uses ClipBrd ... ClipBoard.AsText:=StrToWideStr(SL.Strings[1]); Остальные способы что-то не нравятся, где код на пол страницы и тем более не работает . Что-то более рационального способа ещё не нашел. Может поможете, как это сделать, а то я уже начал делать целую программу. |
#21
|
||||
|
||||
Усё вроде научился.
Всё, теперь умею
Код:
//SL.Free; ClipBoard.SetTextBuf(PansiChar(StrToWideStr(SL.Strings[3]))); |
#22
|
||||
|
||||
Важно
В конце после всех действий всё равно добавь строку
Код:
SL.Free; PS: Это относится ко всем объектам, которые ты сам лично создаешь ( например SL := TStringList.Create; ) PPS: Кстати вот ещё ссылка, скачай всё оттуда, в первую очередь - справочник по API-функциям http://rexinc.narod.ru/load.htm Велик и могуч наш Object Pascal ! ICQ: 357-591-887 Последний раз редактировалось Rokuell, 25.12.2007 в 20:44. |
#23
|
||||
|
||||
Спасибо
Спасибо, я это дня два назад уже скачал
Насчет: Код:
SL.Free Я освобождаю память(SL.Free только при нажатии кнопки "выход". Вопрос: если приложение закрыть на крестик, то освободится ли правильно память ? Последний раз редактировалось Oleg, 25.12.2007 в 21:02. |
#24
|
||||
|
||||
Если ты хранишь строки в TStringList и используешь их не один раз, то объяви переменную SL:TStringList глобальной ( у мня в исходнике, помниться, она была в отдельной процедуре ), и тогда код:
Код:
SL := TStringList.Create; Код:
SL.Free; Велик и могуч наш Object Pascal ! ICQ: 357-591-887 |
#25
|
||||
|
||||
Можно ещё вопрос(возможно немного не по этой теме)
Как сделать так, чтобы я мог вставить текст например в Microsoft World.
При нажатии кнопки и т.д. Т.Е. как узнать идентификатор, куда нужно вставлять символы, про поиск окно я немного разобрался. Код:
var h: HWND; begin h := findwindow(nil, 'Безымянный - Notepad'); Как можно ещё реализовать это ? |
#26
|
||||
|
||||
Если хочешь работать с MS Word, то могу посоветовать:
http://www.kornjakov.ru/stat.htm однако, дело это долгое... А если в блокнот, то поищи в DelphiWorld там было. Велик и могуч наш Object Pascal ! ICQ: 357-591-887 |
#27
|
||||
|
||||
Помогите
А как мне вставить текст в окно переводчика ? (Microsoft World не нужно)
Как это узнать, куда вставлять ? |
#28
|
||||
|
||||
Раз разобрался с поиском, ищи идентификатор нужного тебе окна
(напр. окно переводчика) по его заголовку, потом либо посылай этому окну каждый символ текста (работает, но с ошибками) либо вставь текст в буфер, и пошли окну сообщение Ctrl+V Вот два варианта: Велик и могуч наш Object Pascal ! ICQ: 357-591-887 |
#29
|
||||
|
||||
Спасибо !
Как найти идентификатор программы я примерно знал, но как послать сообщение или символ текста я не знал. Большое спасибо за помощь и что подсказал !
|