TSpinEdit & TstringGred

[Cannibal]

подскажите, как с помощью TSpinEdit задать количество строк и столбцов в компоненте TSpinEdit?
Пишу вот так:

stringgrid1.ColCount:=spinedit1.value;
stringgrid1.rowCount:=spinedit2.value;

выдается ошибка:
[Pascal Ошибка] Unit1.pas(1): Unable to invoke Code Completion due to errors in source code

[mihali4]

А у вас на форме все перечисленные в этом куске кода компоненты есть на самом деле? И StringGrid1, и SpinEdit1, и SpinEdit2?
Если да, то у вас ошибка где-то в другом месте.
Приведите на всякий случай целиком процедуру, с заголовком и проч.

[Cannibal]

procedure TForm1.Button1Click(Sender: TObject);
var i,j:integer;
begin
stringgrid1.Visible:=true;
stringgrid1.ColCount:=spinedit1.value;
stringgrid1.rowCount:=spinedit2.value;
stringgrid1.Height:=(1+spinedit1.value)*stringgrid1.DefaultRowHeight;
stringgrid1.Width:=(1+spinedit1.value)*stringgrid1.DefaultColWidth;
end;

на форме пока только эти компоненты

[mihali4]

Такая процедура компилится без проблем. Исправьте только:
stringgrid1.Height:=spinedit1.value *stringgrid1.DefaultRowHeight;
stringgrid1.Width:=spinedit1.value* stringgrid1.DefaultColWidth;

Вывод - ошибка, мешающая компиляции - в другом месте.