아녕하세요
동적룩업필드때문에 여러차례 글을 올렸는데 잘 안되는건지..
고수분들이 잘 안들어오는 시간때에 글이 올라간건지..
답변 얻기가 좀처럼 힘들군요..
MS-SQL 7.0 데이타베이스 2개라서 룩업필드가 제일 낳을것 같아서
룩업필드가 당첨? 되었는데
잘 안되는군요..
동적으로 룩업필드 만드는거 소스혹시 있으신분 좀 부탁합니다.
아래처럼 해봤는데 잘 안되더군요...쩝
DynamicSField[i + 1] := TStringField.Create( Self );
with DynamicSField[i + 1] do
begin
FieldName := 'OfficeName';
Name := DynamicQry[i + 1].Name + DynamicSField[i + 1].FieldName;
Index := DynamicQry[i + 1].FieldCount;
DataSet := DynamicQry[i+1];
FieldKind := fkLookUp;
KeyFields := 'OFFICECD'; //요기..
LookupCache := False;
LookupDataSet := Q_Office;
LookupKeyFields := 'Cm_CstCD';
LookupResultField := 'Cm_Name';
DisplayWidth := 30;
Size := 30;
Required := False;
end;
DynamicQry[i + 1].parambyname('MONTH_END').asstring := SE_YEAR2.Text + FMEdit2.Text;
DynamicQry[i + 1].FieldDefs.Update;
DynamicQry[i + 1].Open;
DynamicQry[i + 1].First;