Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Вниз

Существует ли в Delphi какой-либо аналог процедуры Readkey, Readln. 


alextov   (2002-02-20 14:28) [0]

В данный момент переписываю DOS-программу с Turbo Pascal на DELPHI 5.
Существует ли в Delphi какой-либо аналог процедуры Readkey, Readln.
То есть в процессе выполнения одной процедуры нужно остановить выполнение программы на каком-то операторе, передать управление на консоль, считать значение параметра и продолжить вычисления с места остановки.
Например
begin
x:=2;
Readkey(y);{readln(y)- сдесь какой-то Делфячий аналог)
z:=x+y;
end;



ProgMan   (2002-02-20 14:34) [1]

В свойствах:
KeyPreview:=True

И обрабатываешь событие:
OnKeyPress
OnKeyDown
OnKeyUp



alextov   (2002-02-20 14:41) [2]

Это я понимаю, но
begin
x:=2;
Form2.Show;{форма,где я по идее должен обрабатывать OnKeyPress
показываеться, а выполнение операторов продолжается
то есть ползователь ничего не успевает ввести как
уже пошло дальше z:=x+y; а Form2 висит на экране }
z:=x+y;
end



Внук   (2002-02-20 14:43) [3]

Form2.ShowModal



alextov   (2002-02-20 14:47) [4]

А если Form2.ShowModal то нельзя будет вводить в Combobox, Edit -поля свои данные нужные для дальнейших рассчетов.



Johnmen   (2002-02-20 15:01) [5]

Возьми хорошую толстую книжку по основам Delphi и внимательно ее прочитай !



MBo   (2002-02-20 15:18) [6]

если combobox и edit на form2, то вводить можно
в модуле form1 uses form2

и после showmodal
param1:=form2.edit1.text;



-=CrazyFish=-   (2002-02-20 15:40) [7]

Если нельзя по другому, то после Form2.Show крутись в цикле ожидания до того момента пока, специально отведенная для этого, глобальная переменная не примет нужное значение. А это самое значение присваивай ей в нужный момент из Form2. Только не забудь в теле цикла вписать Application.ProcessMessages, а то подвесишь свое приложение. Но этот вариант, мягко говоря, не лучший...



Юрий Зотов   (2002-02-20 16:03) [8]

Зачем в консольной программе плодить форму, если надо всего лишь считать значение параметра?

ReadLn в Delphi есть, его и используйте.



Внук   (2002-02-20 16:09) [9]

Вероятно речь идет не о консольном приложении, иначе и вопрос бы не возник, а упоминание слова "консоль" в исходном вопросе только запутывает. Опять проблемы с терминологией :)



alextov   (2002-02-20 17:46) [10]

Сорри,
вариант с Form2.ShowModal работает - я почему-то решил(склероз), что Form2.ShowModal переводит форму Form2 в состояние Enabled=false(и поэтому я не смогу редактировать Edit1,Edit2),
но на практике проверил - работает.
2 Юрий Зотов речь идет не о консольном приложении





Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.73 MB
Время: 0.022 c
4-19379           sandman               2002-01-09 13:42  2002.03.07  
Как уменьшить объём занимаемой памяти?


3-19098           Malyatko              2002-02-11 08:26  2002.03.07  
Обновление записи.


1-19196           YouNick               2002-02-18 17:07  2002.03.07  
Окно поверх всех окон (очень нужно)


1-19261           Андрей Сенченко       2002-02-11 10:27  2002.03.07  
Теория и практика работы с ресурсами.


3-19090           DimaIv                2002-02-08 16:52  2002.03.07  
Возможно ли при помощи процедуры AppendRecord ничего