Так ты всунь вызов процедуры Val в другой процедуре и все будет пучком, например

Код

procedure TForm1.N3Click(Sender: TObject); begin Showmessage('Ïîêà!'); Val; end;

Если я не ошибаюсь, то ты перешел на Дельфи с Паскаля? Тут немного все по другому.

Цитата

Если я не ошибаюсь, то ты перешел на Дельфи с Паскаля? Тут немного все по другому.

Это точно. В Delphi все построено на событиях (OnClick, OnCreate), каторые записываются в процедуры. Поэтому не следует писать что-либо вне процедуры или функции. Вызавай Val; в процедуре, как Blindman

PS. И еще. Если ты указываешь предка в имени процедуры, то можно не указывать его в именах компонентов, т.е. не

Код

procedure TForm1.val; begin Form1.Richedit1.Clear; Form1.RichEdit1.Lines.LoadFromFile('c:\65'); Form1.RichEdit1.Font.Size:=13; Form1.RichEdit1.Font.Name:='Lucida Console' end;

а

Код

procedure TForm1.val; begin Richedit1.Clear; RichEdit1.Lines.LoadFromFile('c:\65'); RichEdit1.Font.Size:=13; RichEdit1.Font.Name:='Lucida Console' end;

Хотя это не ошибка.

Люди, вам уже в самом начале s-mike сказал причину...
Так как сделано - делать нельзя!
Блок begin ... end. - называется блоком инициализации модуля (обычно пишут initialization ... end.), во время этой инициализации еще никаких форм и мемов нет! Их нельзя использовать... Еще даже не все модули проинициализировались...

Засунь вызов Val в событие OnCreate...

Добавлено @ 11:22

Цитата

expected ( but found; ошибка!!!

Эта ошибка пишется потому что есть стандартная функция Val... А у тебя не указывается, что нужно вызвать метод Val у Form1... Да и если бы ты указал, то откомпилировалось бы, но ошибка была бы при запуске, т.к. Form1 еще не создана...

Цитата(p0s0l @ 27.3.2005, 11:20)

Засунь вызов Val в событие OnCreate...

О чем и говорилось:

Цитата(Poseidon @ 27.3.2005, 01:50)

В Delphi все построено на событиях (OnClick, OnCreate), каторые записываются в процедуры. Поэтому не следует писать что-либо вне процедуры или функции. Вызавай Val; в процедуре, как Blindman