Olezka Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Извените для едита!!! Спасиба   Добавлено: waik а можна полную строку или исправте мне пожалуйста   procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if key in [0..9] then; end;   Добавлено: у вар ни чего не надо прописовать Всего записей: 624 | Зарегистр. 30-03-2005 | Отправлено: 12:38 20-03-2006

OdesitVadim Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Для того, чтобы можно было только цифры вводить я пишу так Код:   if not (key in['0'..'9',#8]) then key:=#0;   #8 - это код клавиши забой (для молодёжи - BackSpace ) ---------- Press any key to continue or any other key to exit Пишите так, чтобы не было стыдно за нобелевскую премию. Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 13:25 20-03-2006

Olezka Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору OdesitVadim ваш метод пошел! спасиба а тот видает ошибку если можеш waik напиши целиком Всего записей: 624 | Зарегистр. 30-03-2005 | Отправлено: 13:43 20-03-2006

waik Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Olezka   Ну конечно ошибку будет выдавать Я ведь только подход показывал а не готовый обработчик писал А так OdesitVadim тебе уже правильно показал... Всего записей: 610 | Зарегистр. 15-01-2003 | Отправлено: 14:24 20-03-2006

Olezka Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Все ОК главное пашет   Добавлено: подскажите еще одно когда я делаю ехе файл то на файле отображается значок делфи, а можна ли его сменить?? Всего записей: 624 | Зарегистр. 30-03-2005 | Отправлено: 14:49 20-03-2006

EZH Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Olezka В свойствах проекта. Всего записей: 1738 | Зарегистр. 02-09-2004 | Отправлено: 15:38 20-03-2006

nick444 Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Я поставил на компьютер с хр дельфи 7. Какого было мое удивление, когда после успешной компилляции, моя прога не запустилась (при нажатии F9), а дельфи повис и не реагировал на нажатия. Пробовал переустановить - бесполезно. Что посоветуете (только не скачивание из инета многотонного инсталлятора). Спасибо! Всего записей: 704 | Зарегистр. 04-11-2005 | Отправлено: 16:31 20-03-2006

ALeXkRU Platinum Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору nick444 а может, сначала в твоей проге ошибки поискать? Всего записей: 11998 | Зарегистр. 03-12-2003 | Отправлено: 16:34 20-03-2006

Olezka Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору EZH спасиба нашел nick444 скинь униты попробуем у себя Всего записей: 624 | Зарегистр. 30-03-2005 | Отправлено: 16:58 20-03-2006

OdesitVadim Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору nick444 Этот финт может быть если у тебя анивирь злосно настроен. Делфа когда запускает от себя приложение, то она стартует как отладчик. Может память процеса изменить - это вполне нормально, но не для некоторых антивирей/фаерволов. ---------- Press any key to continue or any other key to exit Пишите так, чтобы не было стыдно за нобелевскую премию. Всего записей: 1568 | Зарегистр. 19-09-2003 | Отправлено: 18:24 20-03-2006

nick444 Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: а может, сначала в твоей проге ошибки поискать? дураков нет! если прога идет на одном компе, а на моем-нет, то дело не в ошибках. Пробовал на приметивнейших прогрпммах (без ошибок точно). Цитата: Этот финт может быть если у тебя анивирь злосно настроен антиврь просто промалчивает. Разве он не должен сообщить, что остановил действие дельфы? попробую убрать антиврь из автозаггрузки. (Или дайте мне уже проверенную вами программу.) Всего записей: 704 | Зарегистр. 04-11-2005 | Отправлено: 20:05 20-03-2006 | Исправлено: nick444, 20:25 20-03-2006

PowerChute Full Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору mafiozy3 А зачем изобретать велосипед? Возьми готовый компонент, например TRzFontComboBox. ---------- Хочешь всего и сразу, а получаешь ничего и постепенно. Всего записей: 520 | Зарегистр. 13-10-2004 | Отправлено: 05:38 21-03-2006 | Исправлено: PowerChute, 06:19 21-03-2006

RostY Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору mafiozy3 combobox1.Items.AddStrings(Screen.fonts); Всего записей: 387 | Зарегистр. 11-01-2006 | Отправлено: 09:18 21-03-2006

Olezka Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Подскажите как к бутону привязать чобы он открывал файл Всего записей: 624 | Зарегистр. 30-03-2005 | Отправлено: 17:46 21-03-2006

EZH Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Olezka Бросай на форму TOpenDialog, у него есть метод Execute, потом из свойства FileName считывай имя выбранного файла. Всё это в OnClick у TButton. А уж как этот файл открывать зависит от его типа. Всего записей: 1738 | Зарегистр. 02-09-2004 | Отправлено: 18:03 21-03-2006

RostY Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Olezka   procedure buton1klick(sender...) бэгин   if OpenDialog1.Execute then Memo1.Lines.LoadFromFile (OpenDialog1.FileName); конэц Всего записей: 387 | Зарегистр. 11-01-2006 | Отправлено: 18:41 21-03-2006

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi

ShIvADeSt (20-04-2006 01:53): http://forum.ru-board.com/topic.cgi?forum=33&topic=6679#1

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование