Assignfile(f1,'e:23.txt');
rewrite(f1);
While NOT EOF do Begin
s := fieldbyname('custno').asstring + ' '+ fieldbyname('company').asstring;
writeln(f1,s);
next;
end;
system.close(f1);
end;
에서요..자료 s:s := fieldbyname('custno').asstring + ' '+ fieldbyname('company').asstring; 부분으로 처리되면 txt에는
1351 Sight Diver
식으로 저장됩니다.... 이부분을 '1351' "custno", sight diver "company" 하려면
어떻게 해야 하나요
String 처리에 대한 질문인 것 같네요...
S 에 값을 대입할 때 이렇게 해 보세요...
s := '''' + fieldbyname('custno').asstring + '''' + ' "CustNo", '
+ fieldbyname('company').asstring + ' "Company"';
=================================================================================
ajfxlspt wrote:
> Assignfile(f1,'e:23.txt');
> rewrite(f1);
> While NOT EOF do Begin
> s := fieldbyname('custno').asstring + ' '+ fieldbyname('company').asstring;
> writeln(f1,s);
> next;
> end;
> system.close(f1);
> end;
> 에서요..자료 s:s := fieldbyname('custno').asstring + ' '+ fieldbyname('company').asstring; 부분으로 처리되면 txt에는
>
> 1351 Sight Diver
> 식으로 저장됩니다.... 이부분을 '1351' "custno", sight diver "company" 하려면
> 어떻게 해야 하나요