(SQL) Integer przy Select tabeli - dramat człowieka

0

Witam
Mam taki kod:

procedure TForm1.Button1Click(Sender: TObject);
begin
  with ibquery1, sql do
   begin
    Close;
    Clear;
    Add('SELECT * FROM BAZA');
    Open;
   end;
end;

I wyskakuje mi błąd:

[Error] Unit1.pas(43): Statement expected, but expression of type 'Integer' found

Weźcie mnie zabijcie, a nie wiem o co chodzi z tym. Nigdy nie miałem takich problemów przy select tabeli.
Zrobiłem nową baze nawet, nowe komponenty dałem, wszystko na cacy. I nic.
Odinstalowałem gruntownie Delphi i zrobiłem wszystko na nowo i dalej nic.

Jaki Integer??? Skąd????

Tabela ma kolumny ID_b (Integer, PK), Nazwisko (Varchar20), Imie (Varchar20) i to wszystko, a tu przy selecie mi takie g**no wyskakuje. Nie mam nerwów. Czepia się do Integera PK?

Co jest grane?

0

Ale w którym dokładnie miejscu dostajesz ten błąd (w której linijce).

0

Przy tej:

 Add('SELECT * FROM BAZA');

...gdy kompiluję. Do ID_b mam założony wyzwalacz, generator i procedurę.

0

A nie masz gdzieś przypadkiem w programie zadeklarowanej zmiennej globalnej 'Add'?

0

Nie mam, tylko mam Formę. A oto cały kod:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Grids, DBGrids, StdCtrls, DB, IBDatabase, IBQuery,
  IBCustomDataSet;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    DBGrid1: TDBGrid;
    IBQuery1: TIBQuery;
    IBDatabase1: TIBDatabase;
    IBTransaction1: TIBTransaction;
    DataSource1: TDataSource;
    procedure Button1Click(Sender: TObject);
    procedure DataSource1DataChange(Sender: TObject; Field: TField);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  with ibquery1, sql do
   begin
    Close;
    Clear;
    Add('SELECT * FROM BAZA');
    Open;
   end;
end;

Aha, przy błędzie, kursor stawia się za średnikiem.

0

Zrobiłem nowy projekt z tą samą bazą i już działa.
Nie wiem co było grane.

1 użytkowników online, w tym zalogowanych: 0, gości: 1