![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Доброго дня всем.
У меня вопрос можно ли сделать следующее: Есть DataModule2 (IBDataBase1, IBTransaction1) Есть форма Buton1 Buton2 DBGrid1 DBGrid2 Нужно сделать следующее при нажатие Buton1 выводится код: IBDataSet1.SelectSQL.Clear; IBDataSet1.SelectSQL.Add(‘ЗАПРОС'); IBDataSet1.Open; Form3.Show; Нужно сделать так чтобы если в торой раз нажать на Buton2 откроется еще однин Form3 но только с другими значениями. У меня почемуто вываливается результат и на одном форме и на другом одинаковый как быть? |
|
#2
|
|||
|
|||
|
конечно одинаковый, у тя получается что гриды направлены на один и тот же датасет.
поясни чего ты изобразить хочешь таким хитрым способом. |
|
#3
|
|||
|
|||
|
Вообщем есть форма1 на ней таблица ДБгрид при дабле клик выводить форму2 в ней ДБедиты , и после чего я опять должен нажать на другую запись нужно всегда просматривать эти записи,
тут можно сделать типо Edit1.text:=DataSet1.FilBuName('....'); но эо долго и неправельно я точно знаю что как то можно сделать, только сам не могу догодаться. |
|
#4
|
||||
|
||||
|
проверяй условие, показана ли Форма 2 - если да, то показываешь Форму 3 ... а если не показана - показываешь Форму 2
Код:
Form2.Showing=True then {показываешь Form3}
else {показываешь Form2}Последний раз редактировалось Yurk@, 15.01.2009 в 23:13. |
|
#5
|
|||
|
|||
|
Такой вариант не пойдет так как на форме 2 все поля тоетсь ДБедиты, и если делать как т предлагаеш то это нужно очень много форм потомучто будет возможность открыть до 10 одновременных окон формы 2
|
|
#6
|
|||
|
|||
|
насколько я понимаю ты таким образом хочешь редактировать записи в удобном виде на отдельной форме, причем редактировать м.б. по нескольку записей сразу, тогда тебе при создании формы редактирования стоит создавать ее собственный датасет, и позиционироваться в нем, например по индексу
|
|
#7
|
|||
|
|||
|
если честно редактировать это я потом буду мне хотябы просто понять как для чтения сделать просто для просмотра.
|
|
#8
|
|||
|
|||
|
Все доброго, мне седня ночью преснилось ))) как нужно сделать чтобы показывалось то что надо ))))) Извеняюсь перед всеми мог и сам догодаться, да и может кому понадобиться тож самое А вдруг ))) вообщем вот код для того чтобы показывалось в одной ворме разные записи )
Код:
procedure TForm14.DBGrid1DblClick(Sender: TObject);
var b: String;
begin
Form13:=TForm13.Create(self);
Form13.Show;
b:=IBDataSet1.FieldByName('ID').AsString;
Form13.IBDataSet1.SelectSQL.Clear;
Form13.IBDataSet1.SelectSQL.Add('select * from OS_TABLE where ID = '+b+'');
Form13.IBDataSet1.Open;Думаю комунибудь то помогу ) Последний раз редактировалось Admin, 17.01.2009 в 13:41. |