Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Перенос строки из DBGreed в String Greed [D5, IB5.x]


Roman Tutov ©   (2002-02-14 10:34:00) 

Подскажите пожалуйста ,как сие програмно осуществить .
Какой-то косяк с типами происходит . А нужно.


Fedorenko Igor   (2002-02-14 13:13:00) [1]

Вот пример для любых типов:

var
col_no, col_count : integer;
begin
if DBGrid1.DataSource.DataSet.IsEmpty then
exit;
col_count := DBGrid1.Columns.Count - 1;
DBGrid1.DataSource.DataSet.First;
DBGrid1.DataSource.DataSet.DisableControls;
While not DBGrid1.DataSource.DataSet.Eof do
begin
// в цикле получаем текстовые значения ячеек DBGrid
// для одной строки
for col_no := 0 to col_count do
begin
// это то что ты видишь на канве грида
DBGrid1.Columns[ col_no ].Field.Text;
end;
DBGrid1.DataSource.DataSet.Next;
end;
DBGrid1.DataSource.DataSet.EnableControls;
end;


Roman Tutov   (2002-02-14 10:50:00) [2]

Таки так и делал . Может кто примерчик подсуетит ?


Desdechado   (2002-02-14 10:41:00) [3]

Greed - жадность :))

а по теме: StringGrid - только строки (в смысле String) содержать может, а под DBGrid - DataSet c полями любых типов.
поэтому, пробегаясь по полям, делай их перенос через FieldByName( ... ).AsString
хотя, не для всех типов такое покатит (например, для BLOB).


Наверх

Титульная страница Поиск, карта сайта Написать письмо