Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

альтернатива stringgrid

Страницы: < 1 2
Тимоха © (2009-01-26 21:19:00)
Сущ. альтернатива stringgrid? только не визуальная. Т.е. мне нужно иметь список из записей. может есть какие то готовые юниты для этого?

MsGuns (2009-01-27 11:36:00) [21]
А чем все же плох стрингрид ?
А показывать его вовсе не обязательно.

датасет по сравнению с сеткой имеет преимущества датасета, т.е. поиски, сортировки, фильтры, сохранение в локальном файле и т.д. Если все это не нужно (хотя и в стрингриде это все не слишком сложно реализовать), то TClientDataSet не нужен.

однако имеет и недостатки. Например, "однородность" данных в колонках

{RASkov} (2009-01-27 09:36:00) [22]
> [18] Германн © (27.01.09 01:53)

Боги злыми не бывают ....наверное. А я злой и жестокий....

Германн (2009-01-27 01:53:00) [23]

> {RASkov} © (27.01.09 00:02) [14]

На "исходниках" ты был бы богом! На тебя б там молились!

Anatoly Podgoretsky (2009-01-27 00:46:00) [24]
> Тимоха (26.01.2009 23:20:10) [10]

Так ты даже и не пытаешься, а приводишь вместо это код ввода записей.

Тимоха (2009-01-27 00:17:00) [25]
RASkov, большое тебе человеческое спасибо!!!!! Уже не раз выручаешь!!!!!!!

Плохиш (2009-01-27 00:17:00) [26]

> Медвежонок Пятачок © (26.01.09 23:41) [13]
>
> нашел.
> значение третьей колонки

Врёшь, там нет третьей колонки :-P

{RASkov} (2009-01-27 00:02:00) [27]
> [10] Тимоха (26.01.09 23:20)

procedure TForm1.Button1Click(Sender: TObject);
begin
with TClientDataSet.Create(nil) do try
with FieldDefs.AddFieldDef do begin
DataType := ftInteger;
Name := 'id';
end;
with FieldDefs.AddFieldDef do begin
DataType := ftString;
Size := 50;
Name := 'name';
end;
with FieldDefs.AddFieldDef do begin
DataType := ftString;
Name := 'code';
end;
CreateDataSet;
AppendRecord([112,'Vasia','12312342']);
AppendRecord([2132,'Masha','72942821']);
AppendRecord([489111,'Kolya','6209562']);
ShowMessage(Lookup('id', 2132, 'code'));
finally
Free;
end;
end;

Медвежонок Пятачок (2009-01-26 23:41:00) [28]
нашел.
значение третьей колонки для данного условия поиска = '72942821'

Тимоха (2009-01-26 23:39:00) [29]
у меня не получается. Прошу помочь)

Медвежонок Пятачок (2009-01-26 23:26:00) [30]
ну если нужно найти, то надо искать.

Тимоха (2009-01-26 23:20:00) [31]
т.е. мне нужно найти запись у которой в первом столбце например строка "2132" и получить значение 3 столбца.

ClientDataset:= TClientDataSet.Create(self);
with ClientDataset.FieldDefs do begin
Add('id',integer);
Add('name',ftString,50);
Add('code',ftString);
end;
ClientDataset.CreateDataSet();
ClientDataset.AppendRecord([112,'Vasia','12312342']);
ClientDataset.AppendRecord([2132,'Masha','72942821']);
ClientDataset.AppendRecord([489111,'Kolya','6209562']);

Медвежонок Пятачок (2009-01-26 23:15:00) [32]
у тебя ошибка в программе

Тимоха (2009-01-26 23:13:00) [33]
все ничего, только никак не могу получить текст из какой-нибудь записи. скажем из 3 столбца, 2 строчка.

{RASkov} (2009-01-26 23:06:00) [34]
> Сущ. альтернатива stringgrid? только не визуальная.

type TMyNoneVisibleGrid = array of array of String;:)

Тимоха (2009-01-26 22:56:00) [35]
никаких файлов не потребуется при переносе программы на другой компьютер?

Медвежонок Пятачок (2009-01-26 22:52:00) [36]
и что ?

Тимоха (2009-01-26 22:46:00) [37]
TClientDataSet весьма хорош.
правда записей у меня чаще всего будет <100 но будут и случаи когда по 100-1000

Медвежонок Пятачок (2009-01-26 21:31:00) [38]
мне нужно иметь список из записей

TClientDataSet

Anatoly Podgoretsky (2009-01-26 21:28:00) [39]
stringgrid не бывают не визуальными.

Медвежонок Пятачок (2009-01-26 21:20:00) [40]
классы, рабоающие с xml

Страницы: < 1 2

Наверх

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