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

Вниз

Передача данных между MDI формами   Найти похожие ветки 

 
dim-   (2005-02-02 17:39) [0]

Помогите
Есть MDI форма , открываю по кнопке новую MDI форму "справочник"
как вернуть выбранную запись справочника в первую форму?
Пробывал передавать в форму справочника DataSet:TDataSet, а при выборе делать DataSet.FieldByName(index_name).AsString:=list.FieldByName("name").AsString
Ругается что нет Field.


 
Reindeer Moss Eater ©   (2005-02-02 17:41) [1]

Что значит "вернуть"?
Когда вернуть?

MDIChild же не модальны.


 
АлексейК   (2005-02-03 10:14) [2]

Ругается что нет Field.

Значит так оно и есть. На каком DataSet"e возникает возникает ошибка?


 
Johnmen ©   (2005-02-03 10:25) [3]

Первейшая задача - провести жирную черту между данными и способами их отображения. Почитать про TDataModule.


 
Плохиш ©   (2005-02-03 10:31) [4]

>dim-   (02.02.05 17:39)
7
1я форма говорит вызванной "я тебя вызвала". Отработав, 2я говорит первой "выбрана запись xxx".

Ключевые слова: property, Owner, procedure, var.


 
Kazus   (2005-02-03 10:31) [5]

Открываем модально форму справочника и далее обрабочик что то типа
If TForm.ShowModal=mrOk Then
  If not TDataSet2.IsEmpty Then
      TDataSet1.FieldByName("Поле куда надо втавить").as...:=
      TDataSet2.FieldByName("Поле откуда надо вставить").as...;


 
Соловьев ©   (2005-02-03 10:42) [6]

http://www.delphikingdom.com/asp/viewitem.asp?catalogid=724


 
dim-   (2005-02-03 17:36) [7]

Может и не очень понятно вопрос задан, Повторю, что формы не модальные (с модальными проблем не).
[6] спасибо за ссылку но там тоже про модальные, да и не оригинально
По поводу вопроса, АлексейК оказался прав ошибся в имени


 
Silver Alex ©   (2005-02-03 18:57) [8]

могу дать такой совет.

в форму которую вызываешь(это справочник) передавай Handle формы из которой вызываешь.Ну а потом шли свое сообщение по этому Handle.

SendMessage(fHandle,WM_main_MESSAGE,0,fID);
если надо создай свою структуру и передавай что угодно

type
TInfo=record
 id: integer;
 name: String[64];
end;

procedure save;
var
 info: Tinfo;
begin
with info do
begin
  id=5;
  iname:="test";
end;
SendMessage(fHandle,WM_main_MESSAGE,0,Integer(@info: ));
Close;
end;



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

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

Наверх




Память: 0.48 MB
Время: 0.042 c
14-1106747384
KSergey
2005-01-26 16:49
2005.02.20
О профессионализме программиста


1-1107929867
Алекс
2005-02-09 09:17
2005.02.20
Проверка готовности дисковода


3-1106299498
juice
2005-01-21 12:24
2005.02.20
Редактирование записи


1-1107512515
REd_imp
2005-02-04 13:21
2005.02.20
Народ как поменять цвет определённой ячейки в Стриггриде


14-1107250545
Vaitek
2005-02-01 12:35
2005.02.20
Исходникик внутри DLL?