Вывод структурных типов данных

@C0V6N · Регистрация: 11.11.2015

Author24 — интернет-сервис помощи студентам

Delphi

type
zapis=record
    nomer:integer;
    fio:string[30];
    voz:integer;
  end;
  stud=array [1..2] of zapis;
var
R:stud;

Так вот сам вопрос: как ввести с клавиатуры через TEdit, например, R[1].nomer?

@krapotkin · 13.04.2016, 21:46

в делфи принято начинать названия классов с T
иначе все сливается, читать невозможно

Delphi

type
TZapis=record
    nomer:integer;
    fio:string[30];
    voz:integer;
end;
TStud=array [1..2] of zapis;
var
  R:TStud;

r[1].nomer - это integer
поэтому надо просто преобразовать строку из TEdit в целое
...

Delphi

1	r[1].nomer:=StrToInt(Edit1.text);

Добавлено через 44 секунды
ну и типом string[xxx] можно пользоваться только от безысходности в этом веке ((

@C0V6N · 13.04.2016, 22:23 **[ТС]**

krapotkin, спасибо большое за разъяснение!
А не подскажите, как вывести r[1].nomer в том же TEdit?

@krapotkin · 13.04.2016, 22:33

преобразовать целое в строку
edit1.text:= IntToStr(r[1].nomer);

@C0V6N · 13.04.2016, 22:54 **[ТС]**

krapotkin, ещё раз премного благодарю вас за помощь!

@northener · 13.04.2016, 22:56

Сообщение от krapotkin

ну и типом string[xxx] можно пользоваться только от безысходности в этом веке

Ну ты сказал! А как тогда пользоваться длинными строками как полями в записях при необходимости сохранять эти записи в файл?

@krapotkin · 13.04.2016, 23:01

в типизированный небось )))

@northener · 13.04.2016, 23:10

Сообщение от krapotkin

в типизированный небось

В типизированный длинные строки?

@krapotkin · 14.04.2016, 06:57

Сообщение от northener

при необходимости сохранять эти записи в файл

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

@C0V6N 1 / 1 / 0 Регистрация: 11.11.2015 Сообщений: 92
	13.04.2016, 22:23 [ТС]	3
	krapotkin, спасибо большое за разъяснение! А не подскажите, как вывести r[1].nomer в том же TEdit? 0

@krapotkin 5873 / 4594 / 1451 Регистрация: 14.04.2014 Сообщений: 20,383 Записей в блоге: 20
	13.04.2016, 22:33	4
	преобразовать целое в строку edit1.text:= IntToStr(r[1].nomer); 1

@C0V6N 1 / 1 / 0 Регистрация: 11.11.2015 Сообщений: 92
	13.04.2016, 22:54 [ТС]	5
	krapotkin, ещё раз премного благодарю вас за помощь! 0

@northener пофигист широкого профиля 4755 / 3190 / 861 Регистрация: 15.07.2013 Сообщений: 18,470
	13.04.2016, 22:56	6
	Сообщение от krapotkin ну и типом string[xxx] можно пользоваться только от безысходности в этом веке Ну ты сказал! А как тогда пользоваться длинными строками как полями в записях при необходимости сохранять эти записи в файл? 0

@krapotkin 5873 / 4594 / 1451 Регистрация: 14.04.2014 Сообщений: 20,383 Записей в блоге: 20
	13.04.2016, 23:01	7
	в типизированный небось ))) 0

@northener пофигист широкого профиля 4755 / 3190 / 861 Регистрация: 15.07.2013 Сообщений: 18,470
	13.04.2016, 23:10	8
	Сообщение от krapotkin в типизированный небось В типизированный длинные строки? 0

@krapotkin 5873 / 4594 / 1451 Регистрация: 14.04.2014 Сообщений: 20,383 Записей в блоге: 20
	14.04.2016, 06:57	9
	Сообщение от northener при необходимости сохранять эти записи в файл единственный вариант, где это есть проблема - это типизированный файл но нынче этот вариант имхо должен использоваться только я не знаю, на микроконтроллерах что-ли ))) современные способы все связаны с потоковым чтением, соотв-но пофиг, хоть 4-байтные строки 0