Не работает программа

[Zhenya_master]

Сообщение от northener

Ну тогда общий совет для любой версии Дельфи.
Щелкаешь правой кнопкой мыши в любом месте кода и во всплывающем меню ищешь пункт Add Watch At Cursor. И в появившемся окне пишешь i
Теперь значение этой переменной ты можешь посмотреть в окне Watch List

Эм, как-то так. Такого, как Вы сказали, нет.

[northener]

Ну а на пункт Debug нажать не пытался? Ведь треугольник/стрелочка говорил(а) что там есть подменю.

[Serge_Bliznykov]

Сообщение от northener

Ну а на пункт Debug нажать не пытался? Ведь треугольник/стрелочка говорил(а) что там есть подменю.

конечно, всё там есть.

debug_submenu.png

[Serge_Bliznykov]

Zhenya_master, Вы сделали загрузку данных из файла?
если да, тогда выложите архив с исходниками проекта + файл с исходными данными (на котором возникает ошибка).

если у меня будет свободное время, я взгляну, где у Вас возникает ошибка.

[NetSpace]

а пусть сделает, чтоб сначала считывало данные из таблицы. и выводило на экран: текст, числа или формат дата-время....
а потом пусть попробует записать данные хотя бы в одну ячейку.
если первые 2 получится, то уже можно будет ему заполнение таблицы делать через цикл.

[Zhenya_master]

Сообщение от Serge_Bliznykov

Zhenya_master, Вы сделали загрузку данных из файла?
если да, тогда выложите архив с исходниками проекта + файл с исходными данными (на котором возникает ошибка).

если у меня будет свободное время, я взгляну, где у Вас возникает ошибка.

Сделал, но опять же, она не работает как и всё остальное. Слишком много разных ошибок в одном коде, сейчас сам всё-таки постараюсь исправить. Надо же как-то учиться.

[NetSpace]

Женя, я года 3 назад вот так же с наскоку пытался освоить запись в EXCEL. выдало херову кучу ошибок.
почесал макушку, подумал и сначала одну ячейку понял и сделал как записывать, потом вторую. получилось!
а потом решил сразу в весь столбец.
и код получился рабочий!
а у тебя точно во все ячейки запись позволена?
проверь это в программе, но по-отдельности. а не через цикл.
а в реальности там столько параметров, а я-то думал, что всего 3-5 строк будет, а вышло вон какой код - просто для примера привёл...

   BeginCol:=3;//начальный столбец
   BeginRow:=2;//начальная строчка
   RowCount:=StringGrid1.RowCount;//строки - размер вводимого массива
   ColCount:=1;//столбцы
   ExcelApp:=CreateOleObject('Excel.Application');
   ExcelApp.Application.EnableEvents:=False;
   Workbook:=ExcelApp.WorkBooks.Add(NameO);//открываем готовый шаблон для заполнения
   ArrayData:=VarArrayCreate([1,RowCount,1,ColCount],varVariant);
   for i:=0 to StringGrid1.RowCount-1 do for j:=0 to StringGrid1.ColCount-1 do ArrayData[i+1,j+1]:=StringGrid1.Cells[j,i];
   Cell1:=WorkBook.WorkSheets[1].Cells[BeginRow,BeginCol];
   Cell2:=WorkBook.WorkSheets[1].Cells[BeginRow+RowCount-1,BeginCol+ColCount-1];
   Range:=WorkBook.WorkSheets[1].Range[Cell1,Cell2];
   Range.Value:=ArrayData;
   ExcelApp.Range[Cell1,Cell2].Rows.RowHeight:=18;//выставляем высоту строчек
   ExcelApp.ActiveWorkbook.SaveAs(NameI);//сохраняем вот с таким именем
   ExcelApp.Application.Quit;
   ExcelApp:=unassigned;

[Zhenya_master]

Сообщение от NetSpace

Женя, я года 3 назад вот так же с наскоку пытался освоить запись в EXCEL. выдало херову кучу ошибок.
почесал макушку, подумал и сначала одну ячейку понял и сделал как записывать, потом вторую. получилось!
а потом решил сразу в весь столбец.
и код получился рабочий!
а у тебя точно во все ячейки запись позволена?
проверь это в программе, но по-отдельности. а не через цикл.
а в реальности там столько параметров, а я-то думал, что всего 3-5 строк будет, а вышло вон какой код - просто для примера привёл...

   BeginCol:=3;//начальный столбец
   BeginRow:=2;//начальная строчка
   RowCount:=StringGrid1.RowCount;//строки - размер вводимого массива
   ColCount:=1;//столбцы
   ExcelApp:=CreateOleObject('Excel.Application');
   ExcelApp.Application.EnableEvents:=False;
   Workbook:=ExcelApp.WorkBooks.Add(NameO);//открываем готовый шаблон для заполнения
   ArrayData:=VarArrayCreate([1,RowCount,1,ColCount],varVariant);
   for i:=0 to StringGrid1.RowCount-1 do for j:=0 to StringGrid1.ColCount-1 do ArrayData[i+1,j+1]:=StringGrid1.Cells[j,i];
   Cell1:=WorkBook.WorkSheets[1].Cells[BeginRow,BeginCol];
   Cell2:=WorkBook.WorkSheets[1].Cells[BeginRow+RowCount-1,BeginCol+ColCount-1];
   Range:=WorkBook.WorkSheets[1].Range[Cell1,Cell2];
   Range.Value:=ArrayData;
   ExcelApp.Range[Cell1,Cell2].Rows.RowHeight:=18;//выставляем высоту строчек
   ExcelApp.ActiveWorkbook.SaveAs(NameI);//сохраняем вот с таким именем
   ExcelApp.Application.Quit;
   ExcelApp:=unassigned;

Попробовал действовать по Вашему методу, но безрезультатно. Я уже просто перебрал много разных вариаций кодов, поиски в интернете и всё такое, но всё безрезультатно. Ошибка в одном и том же месте и вот смотрю на строку, она смотрит на меня и мы оба не можем понять, в чём же проблема.

[northener]

NetSpace, а при чем тут EXCEL? У автора судя по приложенным исходникам никаког ёкселя нет. Только обычный TStringGrid.

Я уже просто перебрал много разных вариаций кодов, поиски в интернете и всё такое, но всё безрезультатно.

Не надо перебирать одно говно из интернета за другим! Ибо это говно.
90% кода в интернете - говно
Пойми правильно то что написано в той статье. Там не говорится что год неправильный. Там говорится что тот код не годится для бездумного повторения и особенно без умения его отлаживать с помощью отладчика.
Вы пробовали мой совет по использованию отладчика?

[NetSpace]

я не говорил ему переходить на EXCEL. просто привёл ему аналогию, где работа с таблицей через цикл происходит на ура, НО к работающему коду я пришёл не с первого раза. вот и всё.