технологическая практика ПрограммаShower-конвертор табличных файлов
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: инновационный менеджмент, реферат обслуживание
| Добавил(а) на сайт: Aksinija.
Предыдущая страница реферата | 3 4 5 6 7 8 9 10 11 12 13 | Следующая страница реферата
OFile := 'pictures.inc';
Free;
end else *)
// if (EFile = '') or not FileExists(EFile) then begin
// EFile := 'C:TmpNachalniy Fileprice33.xls';
// OFile := 'pictures.inc';
EFile := Edit1.Text;
OFile := 'pictures.inc';
if not FileExists(EFile) then begin
MessageDlg('Укажите обрабатываемый файл (*.xls).', mtError, [mbOk],
0);
Exit;
end;
E := TAppExcel.Create;
E.OpenFile(EFile);
I := 1;
S := '';
repeat
E.GetValue(i, 1, V);
S := V;
if Trim(S) > '' then begin
label2.Caption:='Чтение |';
label2.Caption:='Чтение /';
label2.Caption:='Чтение -';
label2.Caption:='Чтение ';
label2.Caption:='Чтение |';
Рекомендуем скачать другие рефераты по теме: дипломная работа исследование, реферат группы.
Категории:
Предыдущая страница реферата | 3 4 5 6 7 8 9 10 11 12 13 | Следующая страница реферата
Главная