Q&A

  • 한번만 봐주셔여~~
3개로 나누어져있는 필드를 합쳐서 원하는 값을 찾아오려합니다..

tape1,2는 string형이고 하나는 I type입니다 Itype은 integer형이 아닌가여?

소스좀 봐주세여...

type형도 맞추어야한다고 하던데 어디가 틀렸는지 에러가 납니다..

고수님들 부탁드립니다 -.-;;;



var

qry_str:string;

begin

with table1 do

begin

close;

tablename:='tapelist.db';

qry_str:= (fieldbyname('tape1').Asinteger)+(fieldbyname('tape2').Asinteger)+(inttostr(fieldbyname('tape3').Asinteger));

open;

if locate(qry_str,search.Text,[loPartialKey]) then

begin

title.Text := fieldbyname('title').AsString;

tapedate.Text:= datetostr(fieldbyname('date22').asdatetime);

end;

end;

end;

1  COMMENTS
  • Profile
    hobakpa 2001.04.17 21:04
    델초보 wrote:

    > 3개로 나누어져있는 필드를 합쳐서 원하는 값을 찾아오려합니다..

    > tape1,2는 string형이고 하나는 I type입니다 Itype은 integer형이 아닌가여?

    > 소스좀 봐주세여...

    > type형도 맞추어야한다고 하던데 어디가 틀렸는지 에러가 납니다..

    > 고수님들 부탁드립니다 -.-;;;

    >

    > var

    > qry_str:string;

    > begin

    > with table1 do

    > begin

    > close;

    > tablename:='tapelist.db';

    > qry_str:= (fieldbyname('tape1').Asinteger)+(fieldbyname('tape2').Asinteger)+(inttostr(fieldbyname('tape3').Asinteger));

    > open;

    --------------------------------------------------------------------------------

    open;

    qry_str:= (fieldbyname('tape1').Asinteger)+(fieldbyname('tape2').Asinteger)+(inttostr(fieldbyname('tape3').Asinteger));



    잘 모르겠는데 오픈을 하고 나서 데이타를 읽어와야 할거 같군요..

    나머지 소스는 잘모르겠군요....

    --------------------------------------------------------------------------------





    > if locate(qry_str,search.Text,[loPartialKey]) then

    > begin

    > title.Text := fieldbyname('title').AsString;

    > tapedate.Text:= datetostr(fieldbyname('date22').asdatetime);

    > end;

    > end;

    > end;