Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailemVyřešeno Delphi - vytvorenie pripojenia na ACCESS DB, ktorá je na serveri

Tak ok, našiel som FREE komponentu, pomocou ktorej sa veľmi jednoducho pripojíte na internetový server do MySQL. Ak by mal niekto záujem o komponetu http://tmysql5.blogspot.com/ - tu máte aj popis. Len treba mať stiahnutú DLL libmysql.dll.

Ešte mini úprava triedy MySQL5.pas :

procedure TMySQL5.SQLCommand(SQL: String);
var Result: PMYSQL_RES;
begin;
  mysql_query(MySQL, pChar(SQL));
end;

procedure TMySQL5.Connect(Host, User, Pass, Data: String; Port: Integer=3306);
begin
  MySQL := mysql_init(nil);
  if MySQL = nil then Fail('Couldn''t init PMYSQL object');
  try
    if mysql_options(MySQL, MYSQL_OPT_CONNECT_TIMEOUT, @MyTime) <> 0 then Fail;
    if mysql_real_connect(MySQL, pChar(Host), pChar(User), pChar(Pass), PChar(Data), Port, nil, MyComp) = nil then Fail;
  except
    Close;
  end;
end;

- A chcel by som sa ešte spýtať, všimol som si u mňa v MySQL, že sa dajú posielať aj Gzip-ované hodnoty (mám tam položku - automaticky rozpoznať), ako to mám spraviť? Stačí hodnotu v dotaze jednoducho zbaliť cez GZip a je to?

Vďaka

Reakce na odpověď

1 Zadajte svou přezdívku:
2 Napište svou odpověď:
3 Pokud chcete dostat ban, zadejte libovolný text:

Zpět do poradny