Форум: "Основная";
Текущий архив: 2003.08.07;
Скачать: [xml.tar.bz2];

Вниз

Как убрать мерцание формы при открытие из него модального окна?   Найти похожие ветки 

← →
II   (2003-07-23 20:15) [0]

Сабж

---

← →
Song   (2003-07-23 20:19) [1]

У меня не мерцает.

---

← →
Skier   (2003-07-23 20:24) [2]

Странный случай !
Ну...DoubleBuffered что ли поставь...

---

← →
Юрий Зотов   (2003-07-23 20:25) [3]

В каком обработчике/методе написан код открытия?

---

← →
II   (2003-07-23 20:30) [4]

Self.DoubleBuffered не помог

Есть на форме грид у него есть OnDblClick вот там написано такое:

SelectForm:=TRefView.Create(nil);

try
if not SelectForm.Init(nref) then exit;
if SelectForm.ShowModal=mrOK then
begin
TDBGridEh(Sender).DataSource.DataSet.Edit;
TDBGridEh(Sender).DataSource.DataSet.Fields[2].AsInteger:=SelectForm.Res;
TDBGridEh(Sender).DataSource.DataSet.Post;
end;
finally
SelectForm.Free;
end;


---

← →
Skier   (2003-07-23 20:43) [5]

>II (23.07.03 20:30)


if SelectForm.ShowModal=mrOK then begin
withTDBGridEh(Sender).DataSource.DataSet do begin
DisableControls;
try
Edit;
Fields[2].AsInteger:=SelectForm.Res;
Post;
finally
EnableControls;
end; //try
end; //with
end; //if


Не спасёт ?

---

← →
II   (2003-07-24 11:38) [6]

Нет не поможет дело в том что в SelectForm.Init(nref) есть вот такая строчка Position:=poMainFormCenter а еще SelectForm.FormStyle по умолчанию равен fsMDIChild из за которого форма первый раз прорисовывалась при Create а второй раз при ShowModal.
Я просто поставил FormStyle в fsNormal и все заработало четко как мультиик

---

← →
KSergey   (2003-07-24 11:44) [7]

Сижу вот и думаю: как бы так вот можно было про fsMDIChild догадаться... Да еще по умолчанию(!)

---

← →
Skier   (2003-07-24 11:47) [8]

>II (24.07.03 11:38)
для fsMDIChild можно с флажком fsVisible поиграться...

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.08.07;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.013 c