Экспорт из AdoQuery в Excel

@Lana1771 · Регистрация: 03.05.2015

Author24 — интернет-сервис помощи студентам

Здравствуйте, помогите пожалуйста.
Сразу перейду к сути:
БД - Access; ADO; Delphi7.
Необходимо экспортировать данные из ADOQuery на шаблон в Excel (сделать ведомость отметок за семестр).
В ADOQuery три поля (Фамилия, Дисциплина, Отметка).
Как осуществить экспорт Фамилий в столбец, а в шапке шаблона Дисциплины в строку?

@Рома Программис · 23.05.2015, 11:57

если понял правильно

Delphi

//вывод на печать
 ExcelApp:= CreateOleObject('Excel.Application');
 ExcelApp.Application.EnableEvents := false;
 ExcelApp.Workbooks.Add(GetCurrentDir() + '\Документы\Пропуски.xls');//путь к шаблону
 ExcelApp.Workbooks[1].WorkSheets[1].Name:='Пропуски';
 ExcelApp.DisplayAlerts := False;
 
 Colum:=ExcelApp.Workbooks[1].WorkSheets['Пропуски'].Rows;
 Colum.Rows[8].Font.Color:=clBlack;
 Colum.Rows[8].Font.Size:=8;
 Colum.Rows.Font.Name:='Times New Roman';
 index:=8;//строка с какой надо начинать выводить 
 with dm.AQZAPROS do begin
   dm.AQZAPROS.First;
 repeat
   Sheet.Cells[index,1]:= dm.AQZAPROS.Fields.Fields[0].AsString;//фамилия
   Sheet.Cells[index,2]:= dm.AQZAPROS.Fields.Fields[1].AsString;//дисциплина
   Sheet.Cells[index,3]:= dm.AQZAPROS.Fields.Fields[2].AsString;//отметка
   Inc(index);//следующая строка
   dm.AQZAPROS.Next;
 
 until  eof;
 
  ExcelApp.Visible := True;
end;

только ты должен шаблон разметить.

@sailen_h · 23.05.2015, 21:37

короч ето нехрена не легко много вариантов если скинешь шаблон и прогу могу поправить и с делать вывод отчета

Delphi

var
XLApp, Sheet, Colum: Variant;
index, i: Integer;
MsExcel: Variant;
Excel,Shee : variant;
Row, Row1, Row2,col, Col1, Col2 : Integer;
nnak,ndat,fio,fio1,fio2,fio3,io,io1,io2,io3:string;
begin
 
XLApp:= CreateOleObject ('Excel.Application');
 
XLApp.Workbooks.Add (-4167);
XLApp.Workbooks [1]. WorkSheets [1]. Name:= 'Íàêëàäíà';
Colum:= XLApp.Workbooks [1]. WorkSheets ['Íàêëàäíà']. Columns;
//îðèåíòàöèÿ ñòðàíèöû
XLApp.Worksheets[1].PageSetup.Orientation := 2;
 
Colum.Columns [1]. ColumnWidth:= 13;
Colum.Columns [2]. ColumnWidth:= 11;
Colum.Columns [3]. ColumnWidth:= 11;
Colum.Columns [4]. ColumnWidth:= 11;
Colum.Columns [5]. ColumnWidth:= 11;
Colum.Columns [6]. ColumnWidth:= 11;
Colum.Columns [7]. ColumnWidth:= 11;
Colum.Columns [8]. ColumnWidth:= 11;
Colum.Columns [9]. ColumnWidth:= 11;
Colum.Columns [10]. ColumnWidth:= 11;
Colum.Columns [11]. ColumnWidth:= 11;
Colum.Columns [12]. ColumnWidth:= 11;
//âûñîòà ñòðîêè
Colum.Rows[1].RowHeight:= 15;
Colum.Rows[2].RowHeight:= 15;
Colum.Rows[3].RowHeight:= 15;
Colum.Rows[4].RowHeight:= 15;
Colum.Rows[5].RowHeight:= 15;
Colum.Rows[6].RowHeight:= 15;
Colum.Rows[7].RowHeight:= 15;
Colum.Rows[8].RowHeight:= 15;
Colum.Rows[9].RowHeight:= 15;
Colum.Rows[10].RowHeight:= 15;
Colum.Rows[11].RowHeight:= 15;
Colum.Rows[12].RowHeight:= 15;
Colum.Rows[13].RowHeight:= 15;
Colum.Rows[14].RowHeight:= 15;
Colum.Rows[15].RowHeight:= 15;
Colum.Rows[16].RowHeight:= 15;
Colum.Rows[17].RowHeight:= 15;
Colum.Rows[18].RowHeight:= 15;
Colum.Rows[19].RowHeight:= 15;
Colum.Rows[20].RowHeight:= 15;
Colum.Rows[21].RowHeight:= 15;
Colum.Rows[22].RowHeight:= 15;
Colum.Rows[23].RowHeight:= 15;
 
Colum.Rows [1]. Font.underline:=xlUnderlineStyleSingle;
 
Colum:= XLApp.Workbooks [1]. WorkSheets ['Íàêëàäíà']. Rows;
//øèðèíà ñòîëáöîâ
Colum.Rows [1]. Font.Size:= 8;
Colum.Rows [2]. Font.Size:= 8;
Colum.Rows [3]. Font.Size:= 8;
Colum.Rows [4]. Font.Size:= 8;
Colum.Rows [5]. Font.Size:= 8;
Colum.Rows [6]. Font.Size:= 8;
Colum.Rows [7]. Font.Size:= 8;
Colum.Rows [8]. Font.Size:= 8;
Colum.Rows [12]. Font.Size:= 8;
Colum.Rows [10]. Font.Size:= 11;
Colum.Rows [11]. Font.Size:= 11;
Colum.Rows [14]. Font.Size:= 11;
Colum.Rows [16]. Font.Size:= 11;
Colum.Rows [18]. Font.Size:= 11;
Colum.Rows [19]. Font.Size:= 11;
 
 
Sheet:= XLApp.Workbooks [1]. WorkSheets ['Íàêëàäíà'];
 
 
//îôîðìëåíèå ëèñòà
Sheet.Cells [1,1]:= 'Äåðæàâíà ô³ñêàëüíà ñëóæáà Óêðà¿íè';
Sheet.Cells [2,2]:= '(íàçâà  óñòàíîâè)';
Sheet.Cells [3,11]:= 'Òèïîâà';
Sheet.Cells [3,12]:= 'ôîðìà ¹3 - 3';
Sheet.Cells [4,8]:= 'ÇÀÒÂÅÐÄÆÅÍÎ';
Sheet.Cells [5,8]:= 'Íàêàç Äåðæàâíîãî êàçíà÷åéñòâà Óêðà¿íè 18.12.2000';
Sheet.Cells [6,8]:= '¹ 130';
Sheet.Cells [7,10]:= 'ÇÀÒÂÅÐÄÆÓÞ';
Sheet.Cells [8,10]:= '( ï³äïèñ êåð³âíèêà óñòàíîâè )';
Sheet.Cells [10,5]:= 'ÍÀÊËÀÄÍÀ (âèìîãà) ¹';
Sheet.Cells [12,1]:= 'Ï³äñòàâà  (ìåòà) ________';
Sheet.Cells [14,1]:= 'Â³ä êîãî :';
Sheet.Cells [16,1]:= 'Êîìó: Äåï.¹';
Sheet.Cells [16,5]:= '×åðåç êîãî:';
Sheet.Cells [16,8]:= 'ê³ìí.¹';
Sheet.Cells [16,10]:= 'çà äîðó÷åííÿì ¹______';
Sheet.Cells [16,12]:= 'â³ä _____';
Sheet.Cells [18,1]:= 'Ïîãîäæåíî:';
Sheet.Cells [19,3]:= 'ÊÔÊ';
Sheet.Cells [18,4]:= 'Äæåðåëî';
Sheet.Cells [19,4]:= 'óòðèìàííÿ';
Sheet.Cells [19,5]:= 'Óñòàíîâà';
Sheet.Cells [18,6]:= 'Ñêëàä';
Sheet.Cells [18,7]:= '(â³äïðàâíèê)';
Sheet.Cells [19,7]:= 'Îòðèìóâà÷';
Sheet.Cells [18,9]:= 'Îòðèìóâà÷';
Sheet.Cells [19,9]:= 'Â³äïðàâíèê';
Sheet.Cells [18,10]:= 'Âèä';
Sheet.Cells [19,10]:= 'îïåðàö³¿';
Sheet.Cells [18,11]:= 'Íîìåð';
Sheet.Cells [19,11]:= 'ñóáðàõóíêó';
Sheet.Cells [19,12]:= 'ÊÅÊÂ';
Sheet.Cells [22,2]:= 'Íàçâà,';
Sheet.Cells [22,3]:= 'ãàòóíîê,';
Sheet.Cells [22,4]:= 'ðîçì³ð';
Sheet.Cells [22,6]:= 'Îäèíèöÿ';
Sheet.Cells [22,7]:= '²íâåíòàðíèé';
Sheet.Cells [22,9]:= 'Ê³ëüê³ñòü';
Sheet.Cells [22,11]:= 'Ö³íà';
Sheet.Cells [22,12]:= 'Ñóìà';
Sheet.Cells [23,6]:= 'âèì³ðó';
Sheet.Cells [23,7]:= 'íîìåð ¹';
Sheet.Cells [23,9]:= 'âèìàãàºòüñÿ';
Sheet.Cells [23,10]:= 'â³äïóùåíî';
Sheet.Cells [23,11]:= 'ãðí.áåç ÏÄÂ';
Sheet.Cells [23,12]:= 'ãðí.áåç ÏÄÂ';
Sheet.Cells[23,1].Value:='ÏÊ,òèï,ñêëàäîâ³ ÷àñòèíè,êîìïëåêòóþ÷³';
Sheet.Cells[23,1].Font.Size:= 9;
 
//n_date
Sheet.Cells [11, 5].Value:= dmbase.qbyfer.Fields.Fields [1]. AsString;
ndat:=Sheet.Cells [11, 5].Value;
//depart2
Sheet.Cells [16, 2].Value:= dmbase.qbyfer.Fields.Fields [22]. AsString;
//surname1,username1,patronumic1
fio1:=dmbase.qbyfer.Fields.Fields[13].Value;
fio2:=dmbase.qbyfer.Fields.Fields[14].Value;
fio3:=dmbase.qbyfer.Fields.Fields [15].Value;
Sheet.Cells[14,2].Value:=fio1+ ' ' + fio2[1]+ '.' + fio3[1] + '.';
fio:=Sheet.cells[14,2].value;
Sheet.PageSetup.RightFooter:='Çäàâ(âèäàâ):____________'+fio+chr(10)+'(Ï³äïèñ)             '+'.'                              +Chr(10);
//surname2,username2,patronumic2
io1:=dmbase.qbyfer.Fields.Fields [19].Value;
io2:=dmbase.qbyfer.Fields.Fields [20].Value;
io3:=dmbase.qbyfer.Fields.Fields [21].Value;
Sheet.Cells [16, 6].Value:= io1+ ' ' + io2[1]+ '.'+ io3[1] + '.';
io:=Sheet.cells[16,6].value;
//öåíòðàëüíûé êîëîíòèêóë
Sheet.PageSetup.CenterFooter:='Àðê.&P';
//íèæíèé ëåâû êîëîíòèêóë
Sheet.PageSetup.LeftFooter:='Ïðèéíÿâ(îòðèìàâ):____________'+io+chr(10)+'Ï³äïèñ â³äïîâ³äàëüíîãî çà çáåðåæåííÿ, åêñïóàòàö³þ òà ïåðåì³ùåííÿ êîìï. òåõí³êè'+Chr(10);
 
//room2
Sheet.Cells [16, 9].Value:= dmbase.qbyfer.Fields.Fields [23]. AsString;
//n_nakl
Sheet.Cells [10, 7].Value:= dmbase.qbyfer.Fields.Fields [0]. AsString;
nnak:=Sheet.Cells [10, 7].Value;
 
Sheet.PageSetup.RightHeader:='&8 Íàêëàäà(âèìîãà) ¹ -'+nnak+' â³ä '+ndat;
//âûãðóçêà
index:= 24;
dmbase.qbyfer.First;
for i:= 0 to dmbase.qbyfer.RecordCount-1 do
   begin
Sheet.Cells [index, 7]:= dmbase.qbyfer.Fields.Fields [6]. AsString;
Sheet.Cells[index,1].value:=dmbase.qbyfer.Fields.Fields[11].value+', '+dmbase.qbyfer.Fields.Fields[12].value+', '+dmbase.qbyfer.Fields.Fields[9].value+', S/N(Srial number) -'+dmbase.qbyfer.Fields.Fields[7].value;
Sheet.Cells [index,6]:= 'øò.';
Sheet.Cells [index,9]:= '1';
Sheet.Cells [index,10]:= '1';
Colum.Rows[index].RowHeight:= 38.25;
Sheet.Cells [index,1].HorizontalAlignment:=xlCenter;
Sheet.Cells [index,1].VerticalAlignment:= xlCenter;
Sheet.Cells [index,6].HorizontalAlignment:=xlCenter;
Sheet.Cells [index,6].VerticalAlignment:= xlCenter;
Sheet.Cells [index,7].HorizontalAlignment:=xlCenter;
Sheet.Cells [index,7].VerticalAlignment:= xlCenter;
Sheet.Cells [index,9].HorizontalAlignment:=xlCenter;
Sheet.Cells [index,9].VerticalAlignment:= xlCenter;
Sheet.Cells [index,10].HorizontalAlignment:=xlCenter;
Sheet.Cells [index,10].VerticalAlignment:= xlCenter;
 
Sheet.Cells[index,1].Font.Size:=10;
Sheet.Cells [index,1].WrapText:= True;
 
Sheet.Range[Sheet.cells[index,1],Sheet.cells[index,5]].Merge;
Sheet.Range[Sheet.cells[index,7],Sheet.cells[index,8]].Merge;
Sheet.Range[Sheet.cells[index+1,7],Sheet.cells[index+1,8]].Merge;
Sheet.Range[Sheet.cells[index,1],Sheet.cells[index,12]].Borders.LineStyle:=1;
Sheet.Range[Sheet.cells[index+1,6],Sheet.cells[index+1,12]].Borders.LineStyle:=1;
Sheet.Cells [index+1,6]:= 'Ðàçîì:  ';
Sheet.Cells [index+1,6].HorizontalAlignment:=xlCenter;
   Inc (index);
   dmbase.qbyfer.Next;
   end;
dmbase.qbyfer.Next;
//îáüåäèíåíèå ÿ÷ååê
Sheet.Range['a2','b2'].Merge(false);
Sheet.Range['b14','c14'].Merge(false);
Sheet.Range['c16','d16'].Merge(false);
Sheet.Range['f16','g16'].Merge(false);
Sheet.Range['c18','c19'].Merge(false);
Sheet.Range['e18','e19'].Merge(false);
Sheet.Range['l18','l19'].Merge(false);
Sheet.Range['c21','l21'].Merge(false);
Sheet.Range['a23','e23'].Merge(false);
Sheet.Range['g22','h22'].Merge(false);
Sheet.Range['g23','h23'].Merge(false);
Sheet.Range['a24','e24'].Merge(false);
sheet.Range['g24','h24'].Merge(false);
//ðàìêà
Sheet.Range['g10','g10'].Borders.LineStyle:=1;
Sheet.Range['b14','c14'].Borders.LineStyle:=1;
Sheet.Range['b16','d16'].Borders.LineStyle:=1;
Sheet.Range['f16','g16'].Borders.LineStyle:=1;
Sheet.Range['i16','i16'].Borders.LineStyle:=1;
Sheet.Range['c18','c19'].Borders.LineStyle:=1;
Sheet.Range['e18','e19'].Borders.LineStyle:=1;
Sheet.Range['l18','l19'].Borders.LineStyle:=1;
Sheet.Range['c20','l20'].Borders.LineStyle:=1;
Sheet.Range['c21','l21'].Borders.LineStyle:=1;
Sheet.Range['a24','e24'].Borders.LineStyle:=1;
Sheet.Range['f24','l24'].Borders.LineStyle:=1;
Sheet.Range['c18','l17'].Borders[xlInsideHorizontal].Weight := xlSingle;
Sheet.Range['a22','l21'].Borders[xlInsideHorizontal].Weight := xlSingle;
Sheet.Range['h18','m19'].Borders[xlInsideVertical].Weight := xlSingle;
Sheet.Range['e22','m23'].Borders[xlInsideVertical].Weight := xlSingle;
Sheet.Range['a24','a22'].Borders[xlEdgeLeft].Weight := xlSingle;
//òåêñò ïî öåíòðó
Sheet.Cells [2,2].HorizontalAlignment:=xlCenter;
Sheet.Cells [10,7].HorizontalAlignment:=xlCenter;
Sheet.Cells [16,9].HorizontalAlignment:=xlCenter;
Sheet.Cells [24,6].HorizontalAlignment:=xlCenter;
Sheet.Cells [24,6].VerticalAlignment:= xlCenter;
Sheet.Cells [24,7].HorizontalAlignment:=xlCenter;
Sheet.Cells [24,7].VerticalAlignment:= xlCenter;
Sheet.Cells [24,9].HorizontalAlignment:=xlCenter;
Sheet.Cells [24,9].VerticalAlignment:= xlCenter;
Sheet.Cells [24,10].HorizontalAlignment:=xlCenter;
Sheet.Cells [24,10].VerticalAlignment:= xlCenter;
Sheet.Cells [24,1].HorizontalAlignment:=xlCenter;
Sheet.Cells [24,1].VerticalAlignment:= xlCenter;
////
InitWt('Çà÷åêàéòå.......  ',80,27);
  StartWt;
  Sleep(2000);
  StopWt;
  ShowMessage('Âèêîíàíî!');
//ïåðåíîñèòü òåêñò
XLApp.Visible:= true;

Я делал прогу для украины думаю ты поймешь

@Lana1771 · 24.05.2015, 22:35 **[ТС]**

Рома Программис, подскажите пожалуйста, хотя бы примерно, как шаблон разметить?

@Рома Программис · 25.05.2015, 11:21

вот я мой документ в коде показано откуда и куда надо выводить. смотрите и сравнивайте.

@Lana1771 · 25.05.2015, 14:18 **[ТС]**

Рома Программис, с этим всё понятно, спасибо. Только всё равно не ясно, как данные из поля вывести не в столбец, а в строку..

@Рома Программис · 25.05.2015, 15:51

можно пример программы

@Lana1771 · 25.05.2015, 22:32 **[ТС]**

Рома Программис, пока нет возможности кинуть пример. просто событие на кнопке, открывающее шаблон. Ваш код очень даже по делу, просто одно поле нужно вывести не в столбец, а в строку

@Bit_Man · 26.05.2015, 04:04

Тут всё зависит от того в каком виде ты получаешь данные для вывода в шаблон.
Если данные в DataSet у тебя в таком же "формате" как и в шаблоне, то тут всё просто.
Если нет, то тут нужно помучиться с кодом вывода в шаблон.
Покажи запрос или что у тебя в DataSet, какие поля?

@Рома Программис · 26.05.2015, 10:19

какое поле

@Рома Программис · 26.05.2015, 10:24

а возможно вам нужен перекрестный запрос
вот мой примет просто в место даты вам надо поменять на дисциплину. в пункте запросы. и код надо заменить, какой код надо я не знаю сам над этим думаю

@Lana1771 · 27.05.2015, 11:01 **[ТС]**

Рома Программис, спасибо вам большое за помощь!

@Рома Программис · 27.05.2015, 11:55

у вас все получилось?

@Lana1771 · 28.05.2015, 16:49 **[ТС]**

Рома Программис, нет, увы, не получилось. но за помощь всё равно благодарю..

Новые блоги и статьи
Книги и учебные ресурсы по C# InfoMaster 08.01.2025 Базовые учебники и руководства Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .	Что такое NullReferenceException и как исправить? InfoMaster 08.01.2025 NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .	Что такое Null Pointer Exception (NPE) и как это исправить? InfoMaster 08.01.2025 Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .	Русский язык в консоли C++ InfoMaster 08.01.2025 При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .	Telegram бот на C# InfoMaster 08.01.2025 Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .	Использование GraphQL в Go (Golang) InfoMaster 08.01.2025 Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .
Что лучше использовать при создании класса в Java: сеттеры или конструктор? Alexander-7 08.01.2025 Вопрос подробнее: На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .	Как работать с GraphQL на TypeScript InfoMaster 08.01.2025 Введение в GraphQL и TypeScript В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .	Счётчик на базе сумматоров + регистров и генератора сигналов согласования. Hrethgir 07.01.2025 Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .	Как перейти с Options API на Composition API в Vue.js BasicMan 06.01.2025 Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .	Архитектура современных процессоров inter-admin 06.01.2025 Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .	История создания реляционной модели баз данных, правила Кодда Programming 06.01.2025 Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .

@Lana1771 0 / 0 / 0 Регистрация: 03.05.2015 Сообщений: 6
		1
	MS Access Экспорт из AdoQuery в Excel 21.05.2015, 01:10. Показов 4001. Ответов 13 Метки нет (Все метки) Здравствуйте, помогите пожалуйста. Сразу перейду к сути: БД - Access; ADO; Delphi7. Необходимо экспортировать данные из ADOQuery на шаблон в Excel (сделать ведомость отметок за семестр). В ADOQuery три поля (Фамилия, Дисциплина, Отметка). Как осуществить экспорт Фамилий в столбец, а в шапке шаблона Дисциплины в строку? 0

@Lana1771 0 / 0 / 0 Регистрация: 03.05.2015 Сообщений: 6
	24.05.2015, 22:35 [ТС]	4
	Рома Программис, подскажите пожалуйста, хотя бы примерно, как шаблон разметить? 0

@Lana1771 0 / 0 / 0 Регистрация: 03.05.2015 Сообщений: 6
	25.05.2015, 14:18 [ТС]	6
	Рома Программис, с этим всё понятно, спасибо. Только всё равно не ясно, как данные из поля вывести не в столбец, а в строку.. 0

@Рома Программис 3 / 3 / 1 Регистрация: 24.12.2013 Сообщений: 113
	25.05.2015, 15:51	7
	можно пример программы 0

@Lana1771 0 / 0 / 0 Регистрация: 03.05.2015 Сообщений: 6
	25.05.2015, 22:32 [ТС]	8
	Рома Программис, пока нет возможности кинуть пример. просто событие на кнопке, открывающее шаблон. Ваш код очень даже по делу, просто одно поле нужно вывести не в столбец, а в строку 0

@Bit_Man 479 / 392 / 112 Регистрация: 24.04.2012 Сообщений: 1,632 Записей в блоге: 3
	26.05.2015, 04:04	9
	Тут всё зависит от того в каком виде ты получаешь данные для вывода в шаблон. Если данные в DataSet у тебя в таком же "формате" как и в шаблоне, то тут всё просто. Если нет, то тут нужно помучиться с кодом вывода в шаблон. Покажи запрос или что у тебя в DataSet, какие поля? 0

@Рома Программис 3 / 3 / 1 Регистрация: 24.12.2013 Сообщений: 113
	26.05.2015, 10:19	10
	какое поле 0

@Lana1771 0 / 0 / 0 Регистрация: 03.05.2015 Сообщений: 6
	27.05.2015, 11:01 [ТС]	12
	Рома Программис, спасибо вам большое за помощь! 0

@Рома Программис 3 / 3 / 1 Регистрация: 24.12.2013 Сообщений: 113
	27.05.2015, 11:55	13
	у вас все получилось? 0

@Lana1771 0 / 0 / 0 Регистрация: 03.05.2015 Сообщений: 6
	28.05.2015, 16:49 [ТС]	14
	Рома Программис, нет, увы, не получилось. но за помощь всё равно благодарю.. 0