프로그램에서 select, insert, update 문장등을 Memo 컴포넌트에 입력한후
20개의 DB Server 에 적용 시키려고 합니다.
insert와 update시에는 try except 구문을 사용해서 실패할 경우
'몇 번 Server에 update 되지 않았습니다' 라는 메세지를 뛰워서 별 문제가 되지는
안거든요 그런데 select 문을 사용하면 나타나는 결과를 Memo에 나타나게 해야 되는데
고정된 select 문이 아니라서요...
--------------
--------------
Query.Open;
while not Query1.EOF do
begin
Memo1.Lines.Add := Query1.? // 이부분이 문제가 되는군요...
Query1.Next
end;
table 수만 작으면 어떻게 해보겠는데... 그렇지 않을때는 어떻게 하는지...
for i:=0 to Query1.FieldCount - 1 do
begin
s:=s+Query1.Fields[i].Asstring;
end;
s string을 메모에 add하면 되지 않을까요?
만일 Field들이 서로 다른 type이면..
field type을 비교해서.. Asinteger 등으로 읽으면 되구요..
그럼.. 참고하세요