Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.10;
Скачать: CL | DM;

Вниз

dbGrid   Найти похожие ветки 

 
Pisar ©   (2004-01-19 17:52) [0]

День добрый!
МОжет кто поможет?!
Почему в Делфи 1 работает а в Делфи 5 не хочет?
Надо из одной формы перенести в другую (в label1) значения из выделенной ячейки в DbGrid.
Делаю так:

procedure Form1.BB1Click(...);
begin
Form1.label1.caption := Form2.dbgrid1.fields[0].asstring;
end;

При этом в Д5 Ругается, Д1 работает.
В чем тут дело?

Юрий


 
Term ©   (2004-01-19 17:55) [1]

ты лучше работай с DataSet"ом зачем тебе данные из грида тянуть


 
Vlad ©   (2004-01-19 17:56) [2]

procedure Form1.BB1Click(...);
begin
label1.caption := Form2.dbgrid1.DataSource.DataSet.fields[0].asstring;
end;


 
Pisar ©   (2004-01-19 17:58) [3]

Щас попробую.


 
Pisar ©   (2004-01-19 18:02) [4]

Попробовал. И не ругается и не работает.

procedure...
F_Ul_77.showmodal;
if F_Ul_77.modalresult = mrOk then
begin
label1.caption := F_Ul_77.dbgrid1.DataSource.DataSet.fields[1].asstring;
// Label1.Caption := F_Ul_77.dbgrid1.fields[0].asstring;
end;
end;


 
Pisar ©   (2004-01-19 18:10) [5]

Что делаю не так?


 
Desdechado ©   (2004-01-19 19:57) [6]

там 0, там 1 - не смущает?


 
Pisar ©   (2004-01-20 09:02) [7]

там 0, там 1 - не смущает? Нет, не смущает. Дело то в принципе!


 
DenK_vrtz ©   (2004-01-20 10:02) [8]

ModalResult кнопки = ? в инспекторе объектов


 
Pisar ©   (2004-01-20 12:19) [9]

ModalResult := mrCancel;
установливается принудительно при открытии формы_2;

Причем: На форме 2 работают правильно все методы, а при вызове из другой формы или ругается или ничего не выводит.
Может глючит D5?


 
Pisar ©   (2004-01-20 12:23) [10]

D5 := Enterprise Version 5.0 Build 5.62;


 
Pisar ©   (2004-01-20 12:26) [11]

Еще что странно: Если на форме 2 вывести из сетки (...набора данных)в метку, то при вызове из формы1 этой метки все работает прекрасно!


 
Academic ©   (2004-01-20 12:44) [12]


> if F_Ul_77.modalresult = mrOk then

1.Проверь в отладчике, действительность условия.
2.Проверь состояние DataSet при закрытии подчиненной формы


 
Pisar ©   (2004-01-20 13:18) [13]

1.Проверь в отладчике, действительность условия.- Условие выполняется, происходит возврат в первую форму если брать из метки, то со значением, если напрямую типа: label1.caption := F_Ul_77.Table1.Fields[1].AsString;

А как может зависеть от состояния DataSet?


 
Academic ©   (2004-01-20 13:22) [14]

Active?
Где датасет находлится, и что с ним происходит
при закрытии формы?


 
DenK_vrtz ©   (2004-01-20 13:25) [15]

поставь у кнопки ModalResult=mrOk и не парься

For example, if a dialog box has OK and Cancel buttons, their ModalResult properties could be set at design time to mrOk and mrCancel, repectively. At runtime, clicking the OK button would then change the dialog’s ModalResult property to mrOk, and clicking the Cancel button would change the dialog’s ModalResult property to mrCancel. Unless further processing is required, there is no need to write OnClick event handlers for the buttons.


 
Pisar ©   (2004-01-20 13:43) [16]

поставь у кнопки ModalResult=mrOk и не парься/
при нажатии на вторую кнопку происходит ModalResult := mrOk;
Смысл?


 
Pisar ©   (2004-01-20 13:46) [17]

DataSet связан с Table. При открытии формы Table.open;
при закрытии close;


 
Pisar ©   (2004-01-20 16:41) [18]

Я в отчаянии!


 
Academic ©   (2004-01-20 17:29) [19]

Ты сам ответил на свой вопрос!!!
Как ты можешь получить значение поля если у тебя
таблица закрывается перед закрытием формы?

> DataSet связан с Table. При открытии формы Table.open;
> при закрытии close ;


 
Pisar ©   (2004-01-21 08:36) [20]

Спасибо!
Всё ТАК ПРОСТО. ОКАЗАЛОСЬ!!!



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

Текущий архив: 2004.02.10;
Скачать: CL | DM;

Наверх




Память: 0.51 MB
Время: 0.025 c
3-29241
Петр
2004-01-19 11:11
2004.02.10
Decision Cube и АDO


14-29549
sad
2004-01-21 08:17
2004.02.10
Lazarus.Win32..Компонент для работы с Interbase Firebird.


7-29624
Maxio
2003-11-25 12:33
2004.02.10
Мегание Label


1-29347
race1
2004-01-28 16:06
2004.02.10
Service


4-29655
Igit
2003-12-05 15:53
2004.02.10
Освобождение IPicture