کد دلفی - چگونه می توان یک فیلد Memo را در DBGrid ویرایش کرد؟

function TCustomDBGrid.GetEditLimit: Integer;
begin
Result := 0;

if Assigned(SelectedField) and (SelectedField.DataType in [ftString, ftWideString, ftMemo]) then
Result := SelectedField.Size;
end;

function TCustomDBGrid.GetEditText(ACol, ARow: Longint): string;
begin
Result := '';
if FDatalink.Active then
with Columns[RawToDataColumn(ACol)] do
if Assigned(Field) then
Result := Field.AsString;
FEditText := Result;
end;

/ 0 نظر / 7 بازدید