Программа-термин, в переводе означающий «предписание», то есть заданную последовательность действий.
Дизайн-деятельность по проектированию эстетических свойств промышленных изделий.
Проект-временно́е предприятие, направленное на создание уникального продукта, услуги или результата.
Меню-перечень блюд и напитков, подаваемых в кафе, ресторане или баре.
Качество – то, что характеризует природу вещи, ее принадлежность к определенному классу предметов.
Диалог- литературная или театральная форма устного или письменного обмена высказываниями (репликами, вопросами и ответами) между двумя и более людьми, также бывает письменный.
Интерфейс-граница между двумя функциональными объектами.
Звук-физическое явление, представляющее собой распространение в виде упругих волн механических колебаний в твёрдой, жидкой или газообразной среде.
Как задать значение переменной которое введено в Edit?
вообщем чтобы из Edit значение поподало в переменную
к примеру:
...
var
kurs: real;
Edit1.Text:='КАКОЕТО_ЧИСЛО'
...
kurs:='РАВЕН_ЭТОМУ_КАКОМУТО_ЧИСЛУ'
Объяснение:
DelphiВыделить код
1
2
3
4
5
6
procedure TForm1.Edit1Change(Sender: TObject);
var
Kurs:real;
begin
Kurs:=StrToFloat(Edit1.Text);
end;
Добавлено через 24 минуты 0 секунд
или так,
DelphiВыделить код
1
2
3
4
5
6
7
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
var
Kurs:real;
begin
if not (Key in ['0'..'9','-','+','.',',',#8,#13]) then Key:=#0;
Kurs:=StrToFloat(Edit1.Text);
end;
