Q&A

  • 리스트뷰에서 파일 넣다가여..
안녕하세여.



리스트뷰에 파일이름과 날짜와 사이즈등을 넣는 프로그램을 짰는데



몇번 하다 보면 중간에 프로그램이 다운이 될때가 있어여.



이게 저만 그런가여..?



이유를 아시면 리플 부탁드립니다..



초보가..



1  COMMENTS
  • Profile
    프리지아 2001.03.26 08:50
    우헤헤 wrote:

    > 안녕하세여.

    >

    > 리스트뷰에 파일이름과 날짜와 사이즈등을 넣는 프로그램을 짰는데

    >

    > 몇번 하다 보면 중간에 프로그램이 다운이 될때가 있어여.

    >

    > 이게 저만 그런가여..?

    >

    > 이유를 아시면 리플 부탁드립니다..

    >

    > 초보가..

    >





    리스트박스에 필드 내용넣기 간단한 예제 입니다.

    도움 되시길 바라면서..



    var

    QDate: TTable;

    listbox1.Clear;

    QDate := TTable.create(application);

    with QDate do begin

    try

    databasename := 'DBDEMOS';

    TableName := 'orders.db';

    open;

    First;

    Repeat

    listbox1.Items.Add(FieldByName('SaleDate').AsString);

    Next;

    until EOF;

    Close;

    finally

    free;



    end;

    end;

    end;