Undeclared identifier.

[Neroaz]

Я использовал тип record:

type TInternet=record
ClientCode:integer;
Surname:string[12];
name:string[12];
PersonalCode:string[12];
Phone:string[20];
Adress:string[20];
end;
type TInternet2=record
ClientCode:integer;
DateOn:string[20];
DateOff:string[20];
Rate:string[10];
end;

С TInternet проблем нет, а вот с TInternet2 проблемы. При считывании переменной DateOn выдает ошибку:
Undeclared identifier: 'Dateon'
Я так понял я неправильно объявил записи? Искал в инете все правильно я объявил, в чем причина?

[Kotofff]

При считывании переменной DateOn выдает ошибку

Покажи код как "считываешь" ...

[Neroaz]

У меня есть анологичная кнопка с TInternet, там такой же код, кроме tmp:TInternet2

procedure TForm1.Button8Click(Sender: TObject);
//Сортировка 2
var j,i:integer; tmp:TInternet2;
begin
if (combobox3.ItemIndex<>-1)
and (StringGrid1.Cells[0,3]='3') then
begin
case ComboBox3.ItemIndex of
5 : for i:=1 to length(mas)-1 do //äàòà îí
for j:=length(mas)-1 downto i do
if mas2[j-1].Dateon>mas[j].Dateon then
begin
tmp:=mas2[j];
mas2[j]:=mas2[j-1];
mas2[j-1]:=tmp;
end;

[Google2010]

ты вот тут mas[j].Dateon then 2 не потерял?
может все-таки

if mas2[j-1].Dateon>mas2[j].Dateon then

[Neroaz]

Google2010
Действительно. Спасибо помогло.