можно
в разделе type например:

TMyStruct = record
I : Integer;
Str : String;
Count : Float;
.....
end;

Потом объявляешь переменную этого типа:

var
Struct : TMyStruct

И используешь:

begin
Struct.I := 0;
.....

Ребята, очень нужен компонент или просто юнит с реализацией протокола mail.ru agent, скачал один компонент (http://yxu.org.ru/files/client.rar) не робит походу... буду очень благодарен.

__________________

You may say I'm a dreamer
But I'm not the only one

Сталкнулся с таким приколом первый раз и затупил...

procedure TForm1.FormCreate(Sender: TObject);
var
msf:textfile;
mes:string;
begin
assignfile(msf,'msgs.txt');
reset(msf);
while not Eof(msf) do
begin
readln(msf,mes);
form1.Edit1.Text:=mes;

{Здесь мне надо менять form1.Edit2.Text, form1.Edit3.Text и т.д. Как это зделать???}
end;

end;

Как вариант - задать для этих эдитов свойство tag тем самым пронумеровав их.
Затем пробежаться по элементам формы и проверь нужный tag и записывать в этот элемент

Поставил семерку и столкнулся с проблемой, что паскаль не хочет разворачиваться на весь экран.Не подскажите как решить эту проблему?

Турбо паскаль развернуть? Alt+Enter

это не совсем то,когда у меня на ноуте была виста,я тоже не мог паскаль развернуть на весь экран,и все только пожимали плечами,в ХР все отлично
наверное более новые версии OS уже не поддерживают такие программные продукты с их полной функциональностью))

TEdit(FindComponent('Edit'+IntToStr(i))).Text:=mes ;

DimkO, странно то как у тебя вообще TP на Win7 запустился Оо. Я только из под VM могу работать.......