![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Существует ли в Delphi какой-либо аналог процедуры Readkey, Readln. [D5, Win95/98]
alextov © (2002-02-20 14:28:00)В данный момент переписываю DOS-программу с Turbo Pascal на DELPHI 5.
Существует ли в Delphi какой-либо аналог процедуры Readkey, Readln.
То есть в процессе выполнения одной процедуры нужно остановить выполнение программы на каком-то операторе, передать управление на консоль, считать значение параметра и продолжить вычисления с места остановки.
Например
begin
x:=2;
Readkey(y);{readln(y)- сдесь какой-то Делфячий аналог)
z:=x+y;
end;
alextov (2002-02-20 17:46:00) [1]Сорри,
вариант с Form2.ShowModal работает - я почему-то решил(склероз), что Form2.ShowModal переводит форму Form2 в состояние Enabled=false(и поэтому я не смогу редактировать Edit1,Edit2),
но на практике проверил - работает.
2 Юрий Зотов речь идет не о консольном приложении
Внук (2002-02-20 16:09:00) [2]Вероятно речь идет не о консольном приложении, иначе и вопрос бы не возник, а упоминание слова "консоль" в исходном вопросе только запутывает. Опять проблемы с терминологией :)
Юрий Зотов (2002-02-20 16:03:00) [3]Зачем в консольной программе плодить форму, если надо всего лишь считать значение параметра?
ReadLn в Delphi есть, его и используйте.
-=CrazyFish=- (2002-02-20 15:40:00) [4]Если нельзя по другому, то после Form2.Show крутись в цикле ожидания до того момента пока, специально отведенная для этого, глобальная переменная не примет нужное значение. А это самое значение присваивай ей в нужный момент из Form2. Только не забудь в теле цикла вписать Application.ProcessMessages, а то подвесишь свое приложение. Но этот вариант, мягко говоря, не лучший...
MBo (2002-02-20 15:18:00) [5]если combobox и edit на form2, то вводить можно
в модуле form1 uses form2
и после showmodal
param1:=form2.edit1.text;
Johnmen (2002-02-20 15:01:00) [6]Возьми хорошую толстую книжку по основамDelphi и внимательно ее прочитай !
alextov (2002-02-20 14:47:00) [7]А если Form2.ShowModal то нельзя будет вводить в Combobox, Edit -поля свои данные нужные для дальнейших рассчетов.
Внук (2002-02-20 14:43:00) [8]Form2.ShowModal
alextov (2002-02-20 14:41:00) [9]Это я понимаю, но
begin
x:=2;
Form2.Show;{форма,где я по идее должен обрабатывать OnKeyPress
показываеться, а выполнение операторов продолжается
то есть ползователь ничего не успевает ввести как
уже пошло дальше z:=x+y; а Form2 висит на экране }
z:=x+y;
end
ProgMan (2002-02-20 14:34:00) [10]В свойствах:
KeyPreview:=True
И обрабатываешь событие:
OnKeyPress
OnKeyDown
OnKeyUp