Форум: "Основная";
Поиск по всему сайту: 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.019 c
3-19115           Dtr                   2002-02-11 11:29  2002.03.07  
Как найти все DBGrid у всех DataSource, принадлежащих DataSet


14-19311          -=CrazyFish=-         2002-01-20 14:18  2002.03.07  
нужен драйвер для CD RW TEAC CD-W524E


1-19180           Alexandr_             2002-02-18 14:18  2002.03.07  
Как переопределить метод OnResize


3-19089           NOV                   2002-02-09 11:05  2002.03.07  
Select Date From ....


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