먼저 Temp Table을 만들었습니다. (Paradox)
작업을 한 후 Form을 종료할 때 Temp Table을 삭제합니다.
그리고 나서 다른 작업을 할 경우 Temp Table을 만들어 사용하려고 하면
그전에 만들어서 사용한 Temp Table을 IndexFile을 찾습니다.
당연히 인덱스 화일을 지웠으니 에러가 나지요 ?
BDE에러인가요 아니면 제가 잘못한 것인지 알려주세요...
급합니다.
감사합니다.
삭제한 방법
Temp_Table.Close; Temp_Table.DeleteTable;
생성방법
Temp_Table.Close;
Temp_Table.DatabaseName := Sys_Temp;
Temp_Table.TableName := '~'+FORMATDATETIME('hhnnss',Time);
Temp_Table.TableType := ttParadox;
WITH Temp_Table.IndexDefs DO BEGIN
Clear;
END;
WITH Temp_Table.FieldDefs DO BEGIN
Clear;
Add('Auto_No',ftAutoInc,0,False);
Add('Surang',ftInteger,0,False);
Add('Cost',ftInteger,0,False);
Add('Gumack',ftInteger,0,False);
END;
WITH Temp_Table.IndexDefs DO BEGIN
Clear;
Add('','Auto_No',[ixPrimary,ixUnique]);
Add('BySurang','Surang',[ixCaseInsensitive]);
END;
Temp_Table.CreateTable;
Temp_Table.Exclusive := True;
Temp_Table.Close;