Соединение и работа с удалённой БД MS SQL на Delphi

[ViTYAi]

Сообщение от Mitriy

Сори попутал
TreeView1.Selected - выделенный фрагмент
можно сделать так, если я тебя точно понял:

if TreeView1.Selected<>nil then .....(TreeView1.Selected)

Идет проверка если есть выделеный фрагмент в TreeView1, а дальше вписываеш свои действия.

По моему не совсем то... Мне надо следующее - на Form1 расположен элемент TreeView1 и есть Form2, на которой расположены Combobox'ы...Надо сделать так, чтобы при двойном нажатии на любой из ДОЧЕРНИХ (!) узлов TreeView1 открывалась Form2 и в СomboBox'ах появлялись какие-то значения (свои для каждого дочернего узла)...
Надо обработать событие OnDblClick(), но тогда и при двойном нажатии на родительский узел запускается Form2!!!

[Баламут]

Сообщение от ViTYAi

Мне надо сделать поле, для вычислений значений которого данные берутся не только из БД, но и из программы...

Ну и?... В чем проблема-то?

[ViTYAi]

Сообщение от Баламут

Ну и?... В чем проблема-то?

Проблема в том, что надо данные вывести в DBGrid... Последний столбик - вычисляемый, но так как данные в DBGrid можно отображать только из БД, то как поступить тогда?

[Баламут]

В гриде отображаются данные не из БД, а из датасета! И в нем, в датасете, организуется вычисляемое поле. И для вычисления значения этого самого поля можно пользоваться чем угодно.

[ViTYAi]

Сообщение от Баламут

В гриде отображаются данные не из БД, а из датасета! И в нем, в датасете, организуется вычисляемое поле. И для вычисления значения этого самого поля можно пользоваться чем угодно.

Во! Теперь догнал... А датасет формируется при чтении данных из БД?

[Банзай]

Сообщение от ViTYAi

По моему не совсем то... Мне надо следующее - на Form1 расположен элемент TreeView1 и есть Form2, на которой расположены Combobox'ы...Надо сделать так, чтобы при двойном нажатии на любой из ДОЧЕРНИХ (!) узлов TreeView1 открывалась Form2 и в СomboBox'ах появлялись какие-то значения (свои для каждого дочернего узла)...
Надо обработать событие OnDblClick(), но тогда и при двойном нажатии на родительский узел запускается Form2!!!

такая проверка может пригодицо: TreeView1.Selected.Count=0 (есть ли потомки) или selected.parent=nil (корневой узел)

илиже каждому этажу в тривейве давать опредилённый индекс рисунка из имэйджлиста, свойством:
Node.SelectedIndex
Node.ImageIndex
Node.StateIndex
и проверять эти свойства у выделенного при двойном щелчке чтоб знать на каком этаже укозатель

индекс этажа, или чёто типа tag у класса TTreeNode сам искал чёт не нашёл...

[Баламут]

procedure TForm1.TreeView1DblClick(Sender: TObject);
begin
if TreeView1.Selected.Level <> 0 then
Application.MessageBox('','',mb_ok);
end;

Вариант 2

procedure TForm1.TreeView1DblClick(Sender: TObject);
begin
if not TreeView1.Selected.HasChildren then
Application.MessageBox('','',mb_ok);
end;

procedure TForm1.TreeView1DblClick(Sender: TObject);
begin
if TreeView1.Selected.Parent <> nil then
Application.MessageBox('','',mb_ok);
end;

Оно?

[Legion 4]

Добавь калькулируемое поле и в событиях калькуляции пиши що хочь, только Автокалькуляцию не забудь включить, ну ессно в ДБгрид добавь это поле чтоб видно было...

[ViTYAi]

Сообщение от Баламут

Оно?

ОНО!!!!!!!! Спасибо

[ViTYAi]

Сообщение от Legion 4

Добавь калькулируемое поле и в событиях калькуляции пиши що хочь, только Автокалькуляцию не забудь включить, ну ессно в ДБгрид добавь это поле чтоб видно было...

Я не шарю в этом пока что... куда что добавить, где что включить...