1) Почему когда в процедуре обращаешься к стринггриду, лейблу или еще к чему-нибудь вылетает ошибка типа " Identifier not found *** "? как это исправить?
2) Объявляю в uses еще 1 unit, в var объявляю вторую форму, но вылетает ошибка "Identifier not found ***"
3)как правильно объявить процедуру в ...
Найдено 5 результатов
- 27.11.2010 10:25:00
- Форум: Обучение Free Pascal
- Тема: Накопилось много вопросов. По поводу процедур и форм.
- Ответы: 3
- Просмотры: 7842
- 18.11.2010 15:36:12
- Форум: Lazarus
- Тема: Ошибка с процедурой и двумерныйм массивом.
- Ответы: 3
- Просмотры: 2666
Re: Ошибка с процедурой и двумерныйм массивом.
Спасибо большое.
- 16.11.2010 19:10:49
- Форум: Lazarus
- Тема: Ошибка с процедурой и двумерныйм массивом.
- Ответы: 3
- Просмотры: 2666
Ошибка с процедурой и двумерныйм массивом.
Написал процедуру, которая должна менять местами части 2умерного массива. Но не это важно...
в общем начало таково:
procedure gorbig(k:array [0..8,0..8] of integer );
var b:array[0..8,0..8] of integer; c,d,e,i,j:integer;
begin
Но вылетает ошибка "unit1.pas(32,26) Fatal: Syntax error, "OF" expected ...
в общем начало таково:
procedure gorbig(k:array [0..8,0..8] of integer );
var b:array[0..8,0..8] of integer; c,d,e,i,j:integer;
begin
Но вылетает ошибка "unit1.pas(32,26) Fatal: Syntax error, "OF" expected ...
- 10.10.2010 18:01:17
- Форум: Lazarus
- Тема: Ошибка при компилировании. Error while linkin
- Ответы: 3
- Просмотры: 2602
Re: Ошибка при компилировании. Error while linkin
В процессах нет. компютер даже перезагрузил. все равно не работает.
- 10.10.2010 17:21:21
- Форум: Lazarus
- Тема: Ошибка при компилировании. Error while linkin
- Ответы: 3
- Просмотры: 2602
Ошибка при компилировании. Error while linkin
Знаю что причин много, но не понятно в чем сейчас. на форме тоько image1 у нее в событиях стоит OnPaint Image1Paint. в прграмме только
procedure TForm1.Image1Paint(Sender: TObject);
begin
image1.canvas.Rectangle(0,0,image1.Height,image1.Width);
end;
А ругается на project1.lpr
begin
{$I ...
procedure TForm1.Image1Paint(Sender: TObject);
begin
image1.canvas.Rectangle(0,0,image1.Height,image1.Width);
end;
А ругается на project1.lpr
begin
{$I ...
