Einzelnen Beitrag anzeigen

Generalissimo

Registriert seit: 28. Aug 2003
187 Beiträge
 
Delphi 6 Enterprise
 
#5

Re: Zeos simple_myssql Problem

  Alt 24. Okt 2003, 18:54
Hi Isabell,

und genau das ist das Problem (TZZMySQLDatabase vs TZMySQLDatabase).
Hab mir mal gerade den Quelltext zur Version 5.5 angeschaut (ZMySQLCon.pas).

In Version 5.5 heisst die Komponente TZZMySQLDatabase. In dem Bsp. heisst sie noch
TZMySQLDatabase. Die haben da scheinbar beim Versionswechsel eine Umbenennung vorgenommen.
Leider haben sie aber das Bsp. nicht angepasst. (Interessanter Hinweis von dir. Danke kann ich auch gut gebrauchen. Ist wichtig für die Umstellung von Software von Version < 5.5 auf 5.5)

Probier einfach mal das Bsp. (simple_mysql) so anzupassen:

Delphi-Quellcode:
{********************************************************}
{                                                        }
{                 Zeos Database Objects                  }
{                Simple MySql Query Test                 }
{                                                        }
{       Copyright (c) 1999-2001 Sergey Seroukhov         }
{                                                        }
{********************************************************}

unit simple_mysql1;

interface

uses
  Classes, SysUtils,
  {$IFNDEF LINUX}
  Windows, Messages, Graphics, Controls, Forms, Dialogs,
  Menus, ExtCtrls, DBCtrls, Db, ComCtrls, ToolWin,
  Grids, DBGrids, StdCtrls, DBTables, ImgList,
  {$ELSE}
  QGraphics, QControls, QForms, QDialogs,
  QMenus, QExtCtrls, QDBCtrls, DB, QComCtrls,
  QGrids, QDBGrids, QStdCtrls, QImgList,
  {$ENDIF}
  ZMySqlQuery, ZMySQLCon, ZDirMySQL, ZMySQLTr,
  ZSQLExtra, ZQuery, ZTransact, ZConnect;

type
  TfrmMain = class(TForm)
    dsMain: TDataSource;
    ilMain: TImageList;
    pnMain: TPanel;
    lbHost: TLabel;
    lbDb: TLabel;
    lbLogin: TLabel;
    lbPswd: TLabel;
    edHost: TEdit;
    edDb: TEdit;
    edLogin: TEdit;
    edPswd: TEdit;
    cbxRequest: TCheckBox;
    cbxStore: TCheckBox;
    Panel1: TPanel;
    mmSql: TMemo;
    Splitter2: TSplitter;
    dgGrid: TDBGrid;
    btnConnect: TButton;
    btnDisconnect: TButton;
    btnExit: TButton;
    btnSort: TButton;
    btnClearSort: TButton;
    btnLocate: TButton;
    btnFilter: TButton;
    dbMain: TZZMySqlDatabase; // hier die Änderung vornehmen
    trMain: TZMySqlTransact;
    qrMain: TZZMySqlQuery; // hier die Änderung auch vornehmen
    procedure btnConnectClick(Sender: TObject);
    procedure btnDisconnectClick(Sender: TObject);
    procedure btnExitClick(Sender: TObject);
    procedure btnSortClick(Sender: TObject);
    procedure btnClearSortClick(Sender: TObject);
    procedure btnLocateClick(Sender: TObject);
    procedure btnFilterClick(Sender: TObject);
  end;

var
  frmMain: TfrmMain;
Sollten weitere Fehler auftreten, immer suchen wo TZ in TZZ umzuwandeln ist. Dabei bissl
im Quelltext von den Komponeten stöbern.
Oder poste es einfach wieder hier.

Achtung scheinbar gibts TZMySQLQuery auch nicht mehr. Jetzt TZZMySQLQuery. Schau mal in die ZMySQLQuery.pas unter ../dbase
  Mit Zitat antworten Zitat