Hallo!
Versuchs mal so:
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
begin
with ZQuery1
do begin
SQL.Clear;
SQL.Add('
EXECUTE STATEMENT (''
');
SQL.Add('
RECREATE TABLE main ('+
'
BOOKNO CHAR(6), '+
'
TITLE CHAR(50) COLLATE ISO8859_1, '+
'
EUROPUB CHAR(50) CHARACTER SET ISO8859_1 COLLATE FR_FR);');
SQL.Add('
''
)');
ExecSql;
end;
end;
Hope it helps
onlinekater
@MrSpock: IBX sind in Verbindung mit Firebird nicht zu empfehlen, Borland selbst sagt ganz klar, daß künftige Firebird-Features nicht unterstützt werden.