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

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

StringGrid ???? [D5, D6, Win95/98, WinME, NT4, Win2k, WinXP]


Svin ©   (2002-09-17 08:40:00) 

Здрасвуйте уважаемые делфисты!!!
я только учусь программировать на делфи поэтому иногда возникают вопросы которые я сам немогу разрешить
буду очень благодарен если вы мне поможете вот в таком вопросе
предположим у нас есть stringrid с некоторыми данными и нам нужно вывести его на печать
но непросто вывести на печать а следующим образом
скажем stringgrid1.cells[0,0] нужно в самом верхнем углу и по сережине, stringgrid1.cells[0,1] в середине страницы,
а stringgrid1.cells[1,1] справо по середине
даже и незнаю как это осуществить
заранее спасибо!


Svin   (2002-09-18 09:13:00) [1]

Project project1.exe raised acceaption class EAccessViolatation
и все такое


Song   (2002-09-17 15:07:00) [2]

А какую ошибку-то на BeginDoc ?
Uses Printer написали?


Svin   (2002-09-17 15:00:00) [3]

я пробовал вот так

PrinterSetupDialog1.Execute;
Printer.PrinterIndex:=0;
ShowMessage(inttostr(Printer.Printers.Count));


Printer.BeginDoc;
printer.Canvas.TextOut(100,120,"2qw");
printer.NewPage;
Printer.EndDoc;

но всё время выдаёт ошибку access violetation на ShowMessage(inttostr(Printer.Printers.Count));
если убрать то выдаёт ошибку на Printer.BeginDoc;
нефига невыходит


ych_boriss   (2002-09-17 14:23:00) [4]

А еще можно использовать событие OnNeedData (какого то банда QuickReport"a)


Mate   (2002-09-17 14:08:00) [5]

Печать сделай через QuickReport поместив на него QRStringBand а на неё соответственно QRExpr и далее
QRExpr1.Items.Text:=QRExpr1.Items.Text+...+#13;
...-там вставляешь свои StringGrid1.Cells[] по порядку , а между ними пробелы в зависимости от их длины и самого шрифта и затем
QuickRep1.Preview.


Svin   (2002-09-17 13:37:00) [6]

а как нарисовать на канве принтера чегото у меня неполучается
напиши плз примерчик


Song   (2002-09-17 09:00:00) [7]

1.Через репорт вывести
2.Нарисовать на канве принтера
3.Выводить форматированными строками.


Наверх

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