Отправляет email-рассылки с помощью сервиса Sendsay

Программирование. Форум !!!

За 2004-03-25

Re[2]: TreeView

Hello Pavel,

Thursday, March 25, 2004, 8:54:11 PM, you wrote:

Pac> Доброго времени суток!

Pac> On Thu, Mar 25, 2004 at 06:34:07PM +0300, Kozlov Alexey wrote:
>> Вот такой вопрос: есть таблица, в которой поля:
>> 1. ID - идентификатор объекта
>> 2. ParentID - идентификатор родительского объекта
>> 3. Name - наименование объекта
>> Как бы мне этим барахлом заполнить TreeView.
Pac> Сформулируйте вопрос более конкретно. Как именно это все должно
Pac> выглядеть в TreeView? Откуда берутся данные? и т.п.
Pac> Если хотите получить ответ, то научитесь правильно задавать вопросы.
Согласен, что нужно вопрос поконкретнее сформулировать. Но в любом
случае, сканируй таблицу по записям, преводи все данные к строковому
типу, и пользуясь методами ADD... (там целый набор модификаций методов
в ветки дерева), заполняешь дерево этим барахлом.

   Вадим Шешунов 2004-03-25 23:55:39 (#112128)

Re: Delphi Базы данных

Доброго времени суток!

On Thu, Mar 25, 2004 at 10:53:14PM +0600, monah wrote:
> Есть две базы данных(не мои) к одной проге. Как их обеденить? формат *.dbf
В смысле две одинаковых базы данных с разными данными? Если так, то все
очень просто. Пишем простенькую программу, которая делает
SELECT * FROM table1 и затем INSERT INTO table2 VALUES(...)
Вместо ... все что вернется из запроса.

   2004-03-25 21:55:59 (#112060)

Re: TreeView

Доброго времени суток!

On Thu, Mar 25, 2004 at 06:34:07PM +0300, Kozlov Alexey wrote:
> Вот такой вопрос: есть таблица, в которой поля:
> 1. ID - идентификатор объекта
> 2. ParentID - идентификатор родительского объекта
> 3. Name - наименование объекта
> Как бы мне этим барахлом заполнить TreeView.
Сформулируйте вопрос более конкретно. Как именно это все должно
выглядеть в TreeView? Откуда берутся данные? и т.п.
Если хотите получить ответ, то научитесь правильно задавать вопросы.

   2004-03-25 21:55:55 (#112059)

Re[2]: (CMyObject ) a = (CMyObject *) b

БГ> Здравствуйте,Дедка.

Д>> ДОпустим есть:
Д>> CMyObject a, *b;
Д>> b = new CMyObject;
Д>> Как сделать что то типа(сам знаю что такое не работает, потому и
Д>> говорю что "типа")

Д>> delete (*)a;
Д>> a = *b;
Д>> изврат, да?
Д>> А зато как бы было все замечательно.......

БГ> Сформулируй вопрос
Есть статическая переменная
CMyObject a;
есть указатель
CMyObject *b = new CMyObject;

приводим _a_ к указателю на ссылающемуся на область памяти объекта _а_

удаляем _а_

присвамиваем указателю _а_ содержимое _b_

Ферштейн?


--
Дедка mailto:geg***@y*****.ru
На муки творчетства подвиг Винамп тем что даже и не запущен
Номер выпуска : 2701
Возраст листа : 185 (дней)
Количество подписчиков : 377
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/112023
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2004-03-25 20:47:16 (#112023)

Re[2]: (CMyObject ) a = (CMyObject *) b

G> Hello Дедка,

G> Wednesday, March 24, 2004, 11:27:34 AM, you wrote:

Д>> ДОпустим есть:
Д>> CMyObject a, *b;
Д>> b = new CMyObject;
Д>> Как сделать что то типа(сам знаю что такое не работает, потому и
Д>> говорю что "типа")

Д>> delete (*)a;
Д>> a = *b;
Д>> изврат, да?
Д>> А зато как бы было все замечательно.......

G> Я понял что ты хочешь...
точно?
G> конструктор копирования. delete (*a) не
G> пройдет, т.к. переменная статическая,
вот-вот... я тоже сомневался, но надеялся, что как-нить это все-таки
можно.
G> вторая строчка пройдет
G> нормально.
Пройти она может в случае, если у нас в классе есть функция = такая,
то есть просто все скопируется из b
А надо что бы мы обращаясь к a, на самом деле обращались к b


--
Дедка mailto:geg***@y*****.ru
На муки творчетства подвиг Винамп тем что даже и не запущен
Номер выпуска : 2701
Возраст листа : 185 (дней)
Количество подписчиков : 377
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/112022
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2004-03-25 20:47:15 (#112022)

Re[2]: (CMyObject ) a = (CMyObject *) b

VVV> Здравствуйте !

>> > CMyObject a, *b;
>> > b = new CMyObject;
VVV> ...
>> > delete (*)a;
>> > a = *b;
>> > изврат, да? > > А зато как бы было все замечательно.......

>> Что значит по человечиски *b, (*)a...?

VVV> Может быть, ссылки подойдут ?
ссылки, конечно, подойдут.
Но нужно именно так.

--
Дедка mailto:geg***@y*****.ru
На муки творчетства подвиг Винамп тем что даже и не запущен
Номер выпуска : 2700
Возраст листа : 185 (дней)
Количество подписчиков : 377
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/112021
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2004-03-25 20:46:42 (#112021)

Re[2]: (CMyObject ) a = (CMyObject *) b

>> ДОпустим есть:
>> CMyObject a, *b;
>> b = new CMyObject;
>> Как сделать что то типа(сам знаю что такое не работает, потому и
>> говорю что "типа")
>>
>> delete (*)a;
>> a = *b;
>> изврат, да?
>> А зато как бы было все замечательно.......
>>

m> Что значит по человечиски *b, (*)a...?
* == (*)== (CMyObject *) == работаем как с указателем.

--
Дедка mailto:geg***@y*****.ru
На муки творчетства подвиг Винамп тем что даже и не запущен
Номер выпуска : 2699
Возраст листа : 185 (дней)
Количество подписчиков : 377
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/112020
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2004-03-25 20:46:38 (#112020)

TreeView

Здравствуйте все!
Вот такой вопрос: есть таблица, в которой поля:
1. ID - идентификатор объекта
2. ParentID - идентификатор родительского объекта
3. Name - наименование объекта
Как бы мне этим барахлом заполнить TreeView.
Заранее спасибо.
Номер выпуска : 2698
Возраст листа : 185 (дней)
Количество подписчиков : 377
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/111973
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   "Kozlov Alexey" 2004-03-25 19:56:34 (#111973)

Delphi Базы данных

Здрасте!
Есть две базы данных(не мои) к одной проге. Как их обеденить? формат *.dbf
Если можно пример, т.к. ни когда не работал с базами данных. Delphi 7
Спасибо.

С уважением monah
e-mail : janal***@n*****.ru
сайт : http:\\janalex.narod.ru
--
Номер выпуска : 2697
Возраст листа : 185 (дней)
Количество подписчиков : 377
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/111968
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2004-03-25 19:52:11 (#111968)

Re: Создаю класс и...

Здрям!
> Т.к. я не очень люблю рутину, то возник вопрос. А нелзя-ли все это
> сделать в классе и привязать класс к тому-же ListBox-у на этапе
> создания экземпляра класса? Т.е. в гавной форме при создании класса,
> нечто вроде: MyObject:=TMyClass.Create(self, ListBox1);
>
> Вот пока и пробую, но неуспешно.
>
> Просьба такая:
> 1. Хочу понять, реально такое сделать и много-ли гемороя?
> 2. Можно ли сделать как-то по другому с меньшими затратами и более
> удобно?
> 3. Подскажите свои идеи, если не жалко!
>
> ЗЫ: Еще вижу вариант создание компонента MyListBox, потомок ListBox,
> со встроенным классом. Но тут пока на уровне идеи!

Вот это ЗЫ, как мне кажется будет оптимально.

MyListbox = class(TListBox)
MyClass:TMyClass;
.....
procedure Create;
end;

procedure create;
begin
inherited Create(Form1);
MyClass:=YMyClass.create;
end;

Я это так представляю.

С уважением monah
e-mail : janal***@n*****.ru
сайт : http:\\janalex.narod.ru
--
Номер выпуска : 2696
Возраст листа : 185 (дней)
Количество подписчиков : 377
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/111967
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2004-03-25 19:51:15 (#111967)

Re: Создаю класс и...

> Создаю класс, который работает с данными. В частном случае без
[...]
> Дальше распологаю на форме различные компоненты, например ListBox. И
> начинаю обрабатывать все возможные режимы: создание экземпляра класса,
> при загрузке формы отображение определенных полей класса в ListBox,
> при изменении данных заново переделывать содержимое ListBox, и еще
[...]
> ЗЫ: Еще вижу вариант создание компонента MyListBox, потомок ListBox,
> со встроенным классом. Но тут пока на уровне идеи!

Привет

Обычно в таком случае поступают именно так - то есть делают отдельный
дельфийский
компонент (но это, конечно, если подобное сочетание твой_класс + ListBox -
типовое, будет где-то
еще у тебя встречаться). Примеров компонентов с исходниками полно, например,
на том же torry.ru.

P.S.

> А нелзя-ли все это [...]
> нечто вроде: MyObject:=TMyClass.Create(self, ListBox1);
> Вот пока и пробую, но неуспешно.

Можно и так (можно как угодно, насколько позволяет язык :) ).
Тогда внутри твоего класса, очевидно, должны быть прописаны
обработчики событий TListBox'а (скажем, твой класс что-то делает
при событии выбора элемента в ListBox) и присвоены при инициализации
твоего объекта свойствам ListBox1'а (ListBox1.OnXXX := MyMethodInMyClass;)
(только, соответственно, используемых тобой в классе обработчиков
событий ListBox1 определять в форме тогда не имеет смысла)
Сам твой класс создается, например, в обработчике события OnCreate формы
(и при создании настраивает ListBox1), уничтожается в OnDestroy формы.

Может быть еще нужно подумать, как провести границы между
объектами взаимодействия с контролами [как разбить всю задачу на
объекты] (если несколько объектов, несколько контролов, пересекающиеся
взаимодействия), отталкиваясь от возможностей языка, а с другой стороны
от типовых решений (начиная от стандартных дельфийских, например,
TDBListBox - который ведь компонент, сделанный на базе ListBox'а, TBDEdit и
т.д.;
как разработчики проектировали взаимодействия, напр., с невизуальным
контролом
TQuery и т.п.) + еще зависит от того, насколько твои разработки типовые и
будут
где-то еще использоваться (а то если нет - можно просто форму делать, и в
ней,
кроме событий, несколько методов, которые грузят что нужно из твоих объектов
и т.п.)

Вот такие пока мысли...

Исходное сообщение От: "Шистеров Павел" <schis-pm@j*****.ru>
Кому: "comp.soft.prog.prog" <philoso***@s*****.net>; <207775>
Отправлено: 25 марта 2004 г. 7:11
Тема: Создаю класс и...

> Здравствуйте Все,
>
> Проблема! /Delphi6/
> Создаю класс, который работает с данными. В частном случае без
> использования БД. Работать-то он работает, а вот весь гиморой именно
> с отображением данных. Т.е. Создаю форму, подключаю модуль с классом.
> Дальше распологаю на форме различные компоненты, например ListBox. И
> начинаю обрабатывать все возможные режимы: создание экземпляра класса,
> при загрузке формы отображение определенных полей класса в ListBox,
> при изменении данных заново переделывать содержимое ListBox, и еще
> море рутинных действий.
>
> Т.к. я не очень люблю рутину, то возник вопрос. А нелзя-ли все это
> сделать в классе и привязать класс к тому-же ListBox-у на этапе
> создания экземпляра класса? Т.е. в гавной форме при создании класса,
> нечто вроде: MyObject:=TMyClass.Create(self, ListBox1);
>
> Вот пока и пробую, но неуспешно.
>
> Просьба такая:
> 1. Хочу понять, реально такое сделать и много-ли гемороя?
> 2. Можно ли сделать как-то по другому с меньшими затратами и более
> удобно?
> 3. Подскажите свои идеи, если не жалко!
>
> ЗЫ: Еще вижу вариант создание компонента MyListBox, потомок ListBox,
> со встроенным классом. Но тут пока на уровне идеи!
>
>
> --
> С уважением, Шистеров Павел
> ICQ # 307634884
> mailto:schis-pm@j*****.ru
> > Номер выпуска : 2692
> Возраст листа : 185 (дней)
> Количество подписчиков : 377
> > Адрес в архиве :
http://subscribe.ru/archive/comp.soft.prog.prog/msg/111459
> > Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
> Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
> Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
> Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru
>
>
>
Номер выпуска : 2695
Возраст листа : 185 (дней)
Количество подписчиков : 377
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/111856
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   "VladS" 2004-03-25 16:45:11 (#111856)

Re: Access+Delphi

Здравствуйте, Gift,

Thursday, March 25, 2004, 12:29:24 AM, вы писали:

G> Есть база Access, в ней две таблицы.
G> Одна содержит краткую информацию, другая полную.
G> Как при клике на ячейку из краткой таблицы, вызвать таблицу-информацию о объекте
G> из краткой.
G> Желательно посмотреть код.

Тут код не нужен. Хотя можно и с кодом.
Значит так:
Таблица1(главная): Поля: ID(ключ),caption(заголовок)
Таблица2(подчиненная): Поля ID2(ключ), IDMaster(идентификатор записи
главной таблицы), Прочие поля.

1. Помещаем на форму(можно на ДатаМодуль) компонент
TADOConnection: ADOConnection1, настраиваем ему соединение до файла
MDB. Активируем.
2. Помещаем компоненты TADOTable: Table1 и Table2. Настраиваем свойство
Connection на ADOConnection1. Свойство TableName для таблиц
соответственно Таблица1 и Таблица2.
3. Помещаем 2 компонента TDataSource. Свойство DataSet соответственно
Table1 и Table2.
4. Для Table2 свойства MasterSource на DataSource1, MasterFields на
ID.
5. Все!! Можно активировать таблицы и помещать всякие DBGrid-ы на
форму.

   2004-03-25 12:56:23 (#111684)

Access+Delphi

Есть база Access, в ней две таблицы.
Одна содержит краткую информацию, другая полную.
Как при клике на ячейку из краткой таблицы, вызвать таблицу-информацию о объекте
из краткой.
Желательно посмотреть код.
Номер выпуска : 2693
Возраст листа : 185 (дней)
Количество подписчиков : 377
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/111592
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

   2004-03-25 10:32:24 (#111592)

Создаю класс и...

Здравствуйте Все,

Проблема! /Delphi6/
Создаю класс, который работает с данными. В частном случае без
использования БД. Работать-то он работает, а вот весь гиморой именно
с отображением данных. Т.е. Создаю форму, подключаю модуль с классом.
Дальше распологаю на форме различные компоненты, например ListBox. И
начинаю обрабатывать все возможные режимы: создание экземпляра класса,
при загрузке формы отображение определенных полей класса в ListBox,
при изменении данных заново переделывать содержимое ListBox, и еще
море рутинных действий.

Т.к. я не очень люблю рутину, то возник вопрос. А нелзя-ли все это
сделать в классе и привязать класс к тому-же ListBox-у на этапе
создания экземпляра класса? Т.е. в гавной форме при создании класса,
нечто вроде: MyObject:=TMyClass.Create(self, ListBox1);

Вот пока и пробую, но неуспешно.

Просьба такая:
1. Хочу понять, реально такое сделать и много-ли гемороя?
2. Можно ли сделать как-то по другому с меньшими затратами и более
удобно?
3. Подскажите свои идеи, если не жалко!

ЗЫ: Еще вижу вариант создание компонента MyListBox, потомок ListBox,
со встроенным классом. Но тут пока на уровне идеи!

   2004-03-25 07:12:53 (#111459)