![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как добавить в ListView компонент ComboBox? [D7, XP]
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]я на этом форуме узнал за три дня больше, чем за две недели чтения книг.