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

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

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

DbGridEh

Alexandr © (2002-12-27 12:56:00)
как функцию написать (есть такая функция?0
типа
TDbGridEh.ColumnByFieldName(fieldname:string):TColumn;

Delirium^.Tremens (2002-12-27 15:07:00) [1]

> вот вырезка из хелпа
> TDBGridEh uses a TDBGridColumnsEh to maintain a collection
> of TColumnEh objects
>
> а что, в 2.5 переименовали?

Пардон, не переименовали, а расплодили :-)
TDBGridColumnsEh = class(TColumnEh)
Просто я в ObjInsp смотрел.

Alexandr (2002-12-27 13:35:00) [2]
ну AnsiUpperCase в любом случае не проблема.
ОК. заюзаем.
Значит так и будет.

passm (2002-12-27 13:33:00) [3]
Alexandr © (27.12.02 13:10)> Сам, конечно. Для приведения к одному регистру - UpperCase. Надеюсь, поля не русскими символами назвыны?

Alexandr (2002-12-27 13:27:00) [4]
вот вырезка из хелпа
TDBGridEh uses a TDBGridColumnsEh to maintain a collection of TColumnEh objects

а что, в 2.5 переименовали?

Delirium^.Tremens (2002-12-27 13:25:00) [5]

> TcolumnEh тогда уж.
> Но это к делу не относится.

Не буду спорить с мастером, но у меня:
Version 2.5

+ Added Delphi 7 support.

Так что, кому как.

Alexandr (2002-12-27 13:18:00) [6]
TcolumnEh тогда уж.
Но это к делу не относится.

Delirium^.Tremens (2002-12-27 13:14:00) [7]

> function GetColumn(DBGridEh: TDBGridEh; const FieldName:
> string): TColumn;

Если уж пользовать DBGridEh, то и Column можно возвращать соответствующий: TDBGridColumnEh

Alexandr (2002-12-27 13:10:00) [8]
так я и думал..
вот только при сравнении имен, неплохо их к одному регистру привести.

Функцию взял где или сам придумал?

passm (2002-12-27 13:07:00) [9]
function GetColumn(DBGridEh: TDBGridEh; const FieldName: string): TColumn;
var
i: Integer;
begin
Result:= nil;
for i:= 0 to DBGridEh.Columns.Count - 1 do
if DBGridEh.Culumns[i].FieldName = FieldName then
begin
Result:= DBGridEh.Columns[i];
Break
end
end;

Наверх

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