Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как добавить в ListView компонент ComboBox? [D7, XP]


Страницы:   1 2

allucard ©   (2007-04-18 13:31:00) 

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

Есть ListView, в нём есть столбцы(columns) Login Password Name Пн....Пт.
Мне необходимо чтоб для каждого пользователя в его строке в столбцах от пн. до пт. можно было в раскрывающемся списке выбрать число от 1 до 8.
Как такое сделать?
Спасибо.


Сергей М.   (2007-04-26 12:20:00) [1]


> allucard   (26.04.07 11:54) [37]


Угу)


allucard   (2007-04-26 11:54:00) [2]


> Сергей М. ©   (26.04.07 11:38) [36]

А эт смотря как пхать?)


Сергей М.   (2007-04-26 11:38:00) [3]

Можно. Если полезет)


allucard   (2007-04-26 11:28:00) [4]


> Сергей М. ©   (26.04.07 09:51) [34]

А можно в ячейку CheckBox впихнуть?


Сергей М.   (2007-04-26 09:51:00) [5]

см. DBGrid1.Columns[..].ButtonStyle, DBGrid1.Columns[..].PickList


allucard   (2007-04-26 09:38:00) [6]

Сделал DataSet, присоеденил его к DBGrid.

Как добавить в DBGrid компонент ComboBox?


allucard   (2007-04-20 17:06:00) [7]


> {RASkov}   (20.04.07 15:01) [30]

ok

DBGrid1.Columns[1].width


allucard   (2007-04-20 17:06:00) [8]


> {RASkov}   (20.04.07 15:01) [30]

ok

DBGrid1.Columns[1].width


{RASkov}   (2007-04-20 15:01:00) [9]

> Где лучше задать ширины колонок в DBGrid, сразу после присвоения
> DataSource?

На твое усмотрение... можно в полях, помоему там есть что-то типа DisplayWidth, сразу.....


allucard   (2007-04-20 13:52:00) [10]

Нашёл.

Где лучше задать ширины колонок в DBGrid, сразу после присвоения DataSource?


allucard   (2007-04-20 13:42:00) [11]

Пишет ошибку доходя до подчёркнутой строки "Missing data provider or data packet", чего ему не хватает?

procedure TForm2.Button5Click(Sender: TObject);
var
   Field: TField;
begin

ClientDataSet1 := TClientDataSet.Create(Self);

 with ClientDataSet1 do
   begin
     with FieldDefs.AddFieldDef do
       begin
         DataType := ftString;
         Name := 'Login';
       end;
     with FieldDefs.AddFieldDef do
       begin
         DataType := ftString;
         Name := 'Password';
       end;
     with FieldDefs.AddFieldDef do
       begin
         DataType := ftString;
         Name := 'Name';
       end;
   end;

ClientDataSet1.Active := true;

DataSource := TDataSource.Create(self);
DataSource.Enabled := false;
DataSource.DataSet := ClientDataSet1;
DataSource.Enabled := true;
DBGrid1.DataSource := DataSource;
DBGrid1.Enabled := true;

end;


allucard   (2007-04-18 17:18:00) [12]


> ASMSoft ©   (18.04.07 16:28) [22]

Спасибо.


allucard   (2007-04-18 17:17:00) [13]


> Сергей М. ©   (18.04.07 16:33) [25]


В какой есть?


Сергей М.   (2007-04-18 16:33:00) [14]


> В книге про RunTime ничего нет


В топку такую книгу.


allucard   (2007-04-18 16:31:00) [15]


> Сергей М. ©   (18.04.07 16:24) [21]

Это когда опыт есть и понимание принципов.
Когда его нет, немного всё иначе.


> Врешь.

Не вру. В книге про RunTime ничего нет.
Я могу без проблем создать в Design-Time поля и т.д.

Пока делаю так:
Создаю экземпляр ТClientDataSet, дальше создаю экземпляр TField, устанавливаю FieldName, но ума не приложу как тип задать.


ASMSoft   (2007-04-18 16:30:00) [16]

Единственное добавлю, что такие действия как создание полей, делается на закрытом датасете....


ASMSoft   (2007-04-18 16:28:00) [17]

> Но там нет даже простенького примерчика как в run-time создавать
> поля.

procedure TForm1.FormCreate(Sender: TObject);

begin
 with ClientDataSet1 do
 begin
   with FieldDefs.AddFieldDef do
   begin
     DataType := ftInteger;
     Name := 'Field1';
   end;
   with FieldDefs.AddFieldDef do
   begin
     DataType := ftString;
     Size := 10;
     Name := 'Field2';
   end;
   with IndexDefs.AddIndexDef do
   begin
     Fields := 'Field1';
     Name := 'IntIndex';

   end;
   CreateDataSet;
 end;
end;

Пример из хелпа, и не надо никуда в инет лазить.....


Сергей М.   (2007-04-18 16:24:00) [18]


> две недели чтения книг.


Врешь.
Не читал ты их.
Иначе давным-давно бы получил ответы на свои вопросы из первоисточников.


Сергей М.   (2007-04-18 16:22:00) [19]


> allucard   (18.04.07 16:17) [18]


Ни эту ни другую "каку" я не читал.

Есть станд.справка от Borland.
Есть MSDN.

Это ВСЕ, что требуется для ответов на ВСЕ вопросы.


allucard   (2007-04-18 16:21:00) [20]

я на этом форуме узнал за три дня больше, чем за две недели чтения книг.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо