![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
|||
|
|||
|
при добовлении записи в таблицу выдает ошибку
|
|
#2
|
|||
|
|||
|
Цитата:
При формировании запроса в строку попало Edit1, а не значение из поля. Вообще-то, в сообщении все написано. В отладчике посмотри что у тебя получается в запросе. |
|
#3
|
|||
|
|||
|
кто нибудь ,что нибудь еще подскажет
|
|
#4
|
||||
|
||||
|
В
Код:
procedure TForm1.FormCreate(Sender: TObject); Код:
IBDatabase1:=TIBDatabase.Create(nil); Код:
procedure TForm1.FormCreate(Sender: TObject);
var
FIniFile: TIniFile;
begin
IBDatabase1:=TIBDatabase.Create(form1);
try///
FIniFile := TIniFile.Create(ExtractFilePath(Application.ExeName)+'config.ini');
try ///
IBDatabase1.DatabaseName:= FIniFile.ReadString('base', 'path', '') ;
Finally///
FIniFile.Free;
end;
IBDatabase1.Connected:=true;
with IBQuery1 do //отрисовка таблицы при старте
begin
sql.Text:= 'select * from it order by data, equipment, invnum,sealnum, os,ss,domen';
open;
end;
except///
on E:Exception do
begin
Application.MessageBox(PChar(e.Message), 'ошибка!!!!!', MB_ICONERROR) ;
Halt;
end;
end;
end; |
|
#5
|
|||
|
|||
|
спасибо. но так совсем неработает
|
|
#6
|
|||
|
|||
|
создал новую табл. теперь выдается такая ошибка.
подскажите где у меня ошибка. и как с ней бороться. а то я уже не знаю куда ткунться. и подскажите какую лучше книжку почитать |