12.07.2015 Views

Lazarus - 错误提示:发生了异常

Lazarus - 错误提示:发生了异常

Lazarus - 错误提示:发生了异常

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

LPRLPILPS-- lazarus 的 主 程 序-- XML 格 式 编 译 配 置 等 信 息-- XML 维 持 单 元 名 称 等 信 息RES -- 资 源 文 件LFM -- Form 格 式 和 delphi DFM 一 样PAS -- Pascal 单 元 文 件然 后 我 们 在 新 form 放 几 个 控 件一 个 TIBConnection名 字 IBConnection1属 性DatabaseNameD:\DEMO.FDBHostName 127.0.0.1PasswordUserNamemasterkeysysdba然 后 令 connected 为 true放 一 个 TSQLTransaction, 使 其 active 为 true一 个 dataset , 类 是 TSQLQuery 名 字 SQLQuery1属 性DatabaseTransactionSqlActiveIBConnection1SQLTransaction1select * from table1true一 个 datasource 控 件 , 名 字 默 认 datasource1Datasetsqlquery1再 添 加 datagrid , 属 性 datasource 为 datasource1一 个 按 钮 , 双 击 按 钮 , 代 码 是sqlquery1.Active:=true;

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!