Прикрепление нового файла .PAS к проекту

[dimon000]

Нужно прикрепить новый модуль к проекту, чтобы выделить туда некоторые процедуры. Делаю так: File -> New -> Unit, сохраняю, прописываю его в Uses уже существующего модуля, запускаю из этого модуля требуемую процедуру - появляется Undeclared Identifier. Что я сделал не так?

[Greblin]

Код приведи. Раз Undeclared Identifier выскакивает, значит, объявил или вызываешь чё то неправильно, скорее всего эту самую функцию

[dimon000]

Main.pas:

...
uses Tasks;
...
AutoSizeGridColumn(1);
...

Tasks.pas:

unit Tasks;

interface

uses Grids;

implementation

uses Main;

procedure AutoSizeGridColumn(Grid: TStringGrid; column: integer);
var
  i : integer;
  temp : integer;
  max : integer;
begin
  max := 0;
  for i := 1 to (Grid.RowCount - 1) do begin
    temp := Grid.Canvas.TextWidth(Grid.cells[column, i]);
    if temp > max then max := temp;
  end;
  Grid.ColWidths[column] := Max + Grid.GridLineWidth + 3;
end;

end.

[Arigato]

Скорее всего нужные процедуры прописаны в разделе implementation, а надо заголовок прописать в interface, а реализацию в implementation.

P.S. Так оно и есть.
Пропиши строчку
procedure AutoSizeGridColumn(Grid: TStringGrid; column: integer);
в разделе interface.

А еще не понятно, зачем в модуле Tasks.pas определено подключение uses Main;

[dimon000]

Спасибо. По поводу вопроса о подключении uses Main;: из этого модуля тоже кое-что будет вызываться из Main.pas.

[Arigato]

Если есть возможность, луше избегать взаимного подключения модулей.

[dimon000]

Кстати, ещё такой вопрос: как можно сделать так, чтобы во всех ячейках определённого столбца TStringGrid находилось по кнопке, причём реакция на нажатие разных кнопок была разной?

[Квэнди]

один вопрос- одна тема. закрыто.