|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
09.10.2011, 22:57 | #1 |
Новичок
Джуниор
Регистрация: 09.10.2011
Сообщений: 1
|
вывод бд в memo
как мне сделать цикл что бы вывести в мемо1 все данные из бд а не по 1 строке как у меня подскажите пожалуйста СРОЧНО НУЖНО!!
я знаю что вопрос легкий но у меня ни чего не получается((( Memo1.Lines.Add(DataModule1.ADOTabl e5.FieldByName('Variant').AsString) ;//1 строка DataModule1.ADOTable5.next; Memo1.Lines.Add(DataModule1.ADOTabl e5.FieldByName('Variant').AsString) ;//2 строка w:=createoleobject('word.applicatio n');//открываем ворд w.visible:=true;//делаем его видимым w.documents.add;//создаем новый документ w.activedocument.range.insertafter( memo1.text) ;//переносим данные из мемо1 в ворд w.activedocument.printout;//печатаем end; Последний раз редактировалось dezertir; 09.10.2011 в 23:20. |
09.10.2011, 23:33 | #2 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
Код:
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вывод результата в Memo | Giggs13 | Общие вопросы Delphi | 1 | 20.02.2011 12:56 |
Вывод из StringGrid в Memo | Grobovichok | Помощь студентам | 0 | 30.01.2011 14:37 |
Вывод в Memo из файла | quarty | Общие вопросы Delphi | 2 | 01.11.2010 00:20 |
Вывод из консоли в Memo | hotcooler17 | Win Api | 3 | 05.02.2010 20:51 |
Вывод в Memo | Siluet | Общие вопросы Delphi | 18 | 17.04.2009 19:49 |