Форум: "Основная";
Поиск по всему сайту: 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.044 c
7-19355           bios_i_ego            2001-12-01 13:06  2002.03.07  
В Паскале было Port


14-19325          -=CrazyFish=-         2002-01-22 17:36  2002.03.07  
прикол


3-19049           yaJohn                2002-02-07 17:05  2002.03.07  
DBGrid


1-19150           kserg@ukr.net         2002-02-21 12:07  2002.03.07  
Вопрос по TEdit - как установить курсор в последнюю позицию текста(без выделения)


1-19233           Geks                  2002-02-19 12:31  2002.03.07  
Как правильно передать строку в DLL или правильно ее обработать?