Вопрос № 57622: Здравствуйте! Есть DBGrig, связанный с таблицей из Access. Через Columns - Title - Caption меняю заголовки полей. На этапе разработки заголовки выглядят как надо, но после запуска программы опять меняют свои названия на те, которые берутся из таблицы...Вопрос № 57627: Здравствуйте эксперты!!!
Подскажите пожалуйста как можно осуществить поиск слова в
документах microsoft office, а конкретнее в word'е??...Вопрос № 57704: Здравствуйте!
Есть ли у кого-нибудь из вас исходники переборщика простых паролей для WinRar? Мне не столько сам переборщик нужен, сколько то, как именно это осуществляется......
Вопрос № 57.622
Здравствуйте! Есть DBGrig, связанный с таблицей из Access. Через Columns - Title - Caption меняю заголовки полей. На этапе разработки заголовки выглядят как надо, но после запуска программы опять меняют свои названия на те, которые берутся из таблицы (а они не красивые :)). Пробовал в обработчике OnShow формы программно изменять данные свойства - все ОК. Может есть все-таки способ добиться того же без написания лишнего кода? Заранее спасибо
Отправлен: 03.10.2006, 21:38
Вопрос задал: Savnick (статус: Посетитель)
Всего ответов: 4 Мини-форум вопроса >>> (сообщений: 9)
Отвечает: Prosto_Blackhowk
Здравствуйте, Savnick!
У компонентов Table есть свойство DisplayLabel, подрихтуй его как надо и буде тебе счастье :))
Ответ отправил: Prosto_Blackhowk (статус: 2-ой класс)
Ответ отправлен: 04.10.2006, 10:46
Отвечает: Gh0stik
Здравствуйте, Savnick!
Дело в том что если в режиме редактирования формы Вы в ADOConnection параметр Connected изменяете на false либо на true (тем самым Вы разрываете связь с базой) то соответсвенно все Ваши труды по оформлению заголовков идут на смарку.(либо Вы разрываете связь с базой в режиме редактирования формы какм либо другим способом например Actinve:=false;) :о(
Поэтому я Вам все-таки советую использовать такой маленький программный подход.
Описываете константу вида (где НазваниеХ - соответствующая подпись поля):
grid:array [0..4] of string=('Название1','Название2','Название3','Название4','Название5');
Далее в обработчике FormCreate пишите код вида:
procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
for i:=0 to 3 do
DBGrid1.Columns[i].Title.Caption:=grid[i];
end;
Удачи!!!
--------- Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус: Практикант)
Ответ отправлен: 04.10.2006, 16:12
Отвечает: 3лоумышленник
Здравствуйте, Savnick!
Попробуйте для таблицы создать объекты-столбцы. Для этого нужно по таблице щёлкнуть 2 раза, по открывшемуся кошку (по пустому месту правой мышью и выбрать "Add all fields"). После этого всё должно быть нормально.
Совет: не пользуйтесь DBGrid, потому что полное г..но. Найдите библиотеку EhLib, в ней есть DBGridEh - крутая вещь. EhLib для СНГ бесплатный.
Успехов.
--------- "Люди неизбежно умирают", A. Schwarzenegger (Terminator 3: Rise of the Machines)
Ответ отправил: 3лоумышленник (статус: Студент)
Ответ отправлен: 04.10.2006, 19:46
Отвечает: CjJoker
Здравствуйте, Savnick!
Просто, необходимо именовать поля в ADOTable, ADOQuery и т.к.
Вот пример для TADoQuery:
Бросаете компонент ADoConnection - заполняете его поля
- затем AdoQuery - связываете с AdoConnection -
затем правой клавишей мыши на AdoQuery - Fields Editor - и правите поля
Удачи.
Ответ отправил: CjJoker (статус: 2-ой класс)
Ответ отправлен: 05.10.2006, 09:32
Вопрос № 57.627
Здравствуйте эксперты!!!
Подскажите пожалуйста как можно осуществить поиск слова в
документах microsoft office, а конкретнее в word'е??
Отправлен: 03.10.2006, 22:28
Вопрос задал: F Ruslan R (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: sir henry
Здравствуйте, F Ruslan R!
Дело в том, что современные форматы документов Офиса хранятся в сжатом виде, поэтому проще всего производить поиск слова средствами самого Word'а.
Алгоритм таков:
- Создаете Variant-переменную - ссылку на Word;
- Открываете документ;
- Задаете в свойствах Find параметры поиска;
- Делаете Find.Execute:
- Если Find.Found = True, значит слово найдено, если False - закрываем документ и по новой с первого пункта.
Ответ отправил: sir henry (статус: Академик) Россия, Красноярск ---- Ответ отправлен: 04.10.2006, 08:10
Вопрос № 57.704
Здравствуйте!
Есть ли у кого-нибудь из вас исходники переборщика простых паролей для WinRar? Мне не столько сам переборщик нужен, сколько то, как именно это осуществляется...
Отвечает: Проходящий Мимо
Здравствуйте, Томша Павел!
Что можно посоветовать, для внешних программ Евгений Рошал разработал библиотеку unrar.dll. Обертку к ней можно взять с http://www.compression.ru/fido/ru.compress.0031.htm#66 , саму библиотеку: http://www.rarlab.com/rar/UnRARDLL.exe.
Далее,
1. подключаете её к Вашей программе
2. передаете у процедуру "RARSetPassword" свой пароль
3. пробуете открыть архив "AROpenArchive"
4. ловите код ошибки (если ее нет, поздравляю)
Пример работы с библиотекой смотрите здесь:
http://delphiworld.narod.ru/base/unrar.html, коды ошибок поищите сами.
Возможно эксперты подскажут более оптимальный вариант.
Дерзайте!
--------- Carpe diem!
Ответ отправил: Проходящий Мимо (статус: 7-ой класс)
Ответ отправлен: 04.10.2006, 16:31
