VPF::Создание подобия MessageDlg - Форум программистов

Chyslyvchyk

Дата 10.1.2005, 17:01 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 446
Регистрация: 9.5.2004

Репутация: 1
Всего: 5

Хочу создать подобие MessageDlg (ну оч охота картинку свою влепить) вот в этом кусочке кода на форме Form1:

Код


while not eof(File) do
 .....  
begin
if переменная = Edit1.Text then
  begin 
  messageDlg('Bingo!!!', mtInformation, [mbOK], 0);
  break;
  end
else
 messageDlg('Ошибочка вышла!', mtError, [mbOK], 0);
end;

Создаю формы Form2 и Form3, кидаю на них Image, Label и меняю код:

Код


while not eof(File) do
 .....  
begin
if переменная = Edit1.Text then
  begin 
  Form2.Show;
  break;
  end
else
 Form3.Show;
end;

И происходит следующее: Form2 (или Form3, взависимости от хода цикла) мелькают и все... их практически незаметно... В нужно сделать? smile

--------------------

Простота - сестра таланта!

z-END

Дата 10.1.2005, 17:04 (ссылка)

(нет голосов)

Загрузка ...

прафесар™

Профиль
Группа: Комодератор
Сообщений: 3014
Регистрация: 13.3.2003
Где: Венья, Пиетари

Репутация: 11
Всего: 102

Код


Form3.ShowModal;

--------------------

Каждый чилавек пасвоему праф...а памоему НЕТ!

Chyslyvchyk

Дата 10.1.2005, 17:06 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 446
Регистрация: 9.5.2004

Репутация: 1
Всего: 5

--------------------

Простота - сестра таланта!

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »