| Aptem |
| Отправлено: 16.04.2004, 03:50 |
|
Мастер участка
Группа: Участник
Сообщений: 349
|
Привет, всем !
Вызываю функцию InputQuery, как увеличить максимально допустимое число вводимых символов в Edit ?
Спасибо за внимание. Надеюсь все понятно, если нет, то опишу подробнее.
|
|
| Иван |
| Отправлено: 16.04.2004, 06:33 |
|
Машинист паровоза
Группа: Участник
Сообщений: 207
|
А до скольки символов нужно увеличить максимально допустимое число?
Ну если я правильно понял,то нужно при помощи InputQuery,задать текст в Edit.У меня до 50 символов работает нормально.
или я не правильно вас понял...
|
|
| th1nG |
| Отправлено: 16.04.2004, 08:44 |
|
Дежурный стрелочник
Группа: Участник
Сообщений: 31
|
4096 символов тебе мало?
сразу надо подробней писать
|
|
| Aptem |
| Отправлено: 19.04.2004, 03:59 |
|
Мастер участка
Группа: Участник
Сообщений: 349
|
У меня в InputQuery 256 символов входит ! Можно ли увеличить это число, например до 500 или 1000 символов ?
|
|
| Aptem |
| Отправлено: 21.04.2004, 03:10 |
|
Мастер участка
Группа: Участник
Сообщений: 349
|
Так что ??? Неужели нельзя изменить эту длину ???
|
|
| Asher |
| Отправлено: 21.04.2004, 09:15 |
|
Мастер участка
Группа: Модератор
Сообщений: 550
|
Сделай свое такое-же окошко и не мучайся.
Делов минут на 15.
Продолжаю. а то начальник отвлекал 
Потому, что если заглянуть в файл dialogs.pas ? то можно увидеть в реализации функции | CODE | | function InputQuery(const ACaption, APrompt: string; var Value: string): Boolean; |
такую строку:
MaxLength := 255;
т.е. жестко забитую константу. 
P.S. Люди — Borland же вам специально типа исходники дал 
Смотрите. Изучайте.
Отредактировано Asher — 21/04/2004, 12:07
|
|
| Aptem |
| Отправлено: 21.04.2004, 14:20 |
|
Мастер участка
Группа: Участник
Сообщений: 349
|
Спасибо Asher... !
|
|
| th1nG |
| Отправлено: 21.04.2004, 17:53 |
|
Дежурный стрелочник
Группа: Участник
Сообщений: 31
|
дополнение к коментам Asher'а
создаёш окно например обзываеш ево InputForm
меняеш размер, стиль как тебе удобно
суваеш на нево TEdit c именем Edit1
кладеш 2 кнопки OK и Канкел
у OK делаеш ModalSesult = mrOK
у Канкела делаеш ево mrCancel
форма готова.
теперь там где надо вызвать InputQuery ты вызываеш эту форму модально. т.е.
| CODE | if(InputForm->ShowModal())
{
if(InputForm->ModalResult == mrOk)
{ ShowMessage(InputForm->Edit1->Text);
}
}
else
{ ShowMessage("Блин, введи чонить и нажми ОК");
} |
незабуть в голове главной формы ( от куда вызываеш ) накалякать #include Unit2.h // или както так
|
|
