Mas aku baru belajar delphi dan mau tahu tentang delphi lebih banyak..mohon bantuannya ya para master2 sekalian... Mas klo kita bikin aplikasi pake db sql server n delphi di PC. trus gimana y cara distribusi aplikasi tersebut biar bisa diakses client server??? tolong jelasin y mas.. ak soalnya dah bikin aplikasi dirumah tapi mw di distribusiin di kantor...tp kok g bisa bisa y...?? 1. apa yang harus disetting di aplikasi client & servernya? 2. untuk koneksinya apa ada code tambahan?? 3. kalo ada artike ato source yang bisa ngasih tau langkah2 dari a s/d z aku mau dan makasih banget... regards, almer

wah jawaban atas pertanyaan anda tidak sesimple yg anda bayangkan. musti di sinkronisasikan ama persoalan (jenis app) yg sedang anda buat. coba anda jelentrehkan dulu, siapa tau rekan2 ada yg bisa bantu...

@adams2610 Konsep database client server itu... kira kira begini.. - Database (DBMS) di taruh di Server.. - Program/Applikasi di taruh di Client.. Nah Sekarang Kalo umpama waktu anda membuat program (Dalam kasus ini mungkin MS-SQL), sewaktu anda mendistribusikan program yang anda buat, harusnya anda sertakan juga DB enggine dari DBMS yang di gunakan. Semisal pake paradox, Lib DLL yang BDE nya harus di copy juga mas. Mo simple nya mungkin pake Installshield Express (Bawaan Delphi)... nanti ada opsi DBMS apa yang mau di sertakan.. MySQL cukup Copy File LibmySQL.dll dalam folder yang sama dengan sistem anda. (ndak memaksa loh.. :) moga membantu. @nDelphiexpert Galak pisan euy.. murid pada kabur atuh.. hak hak hak...

@DelphiExpert: wah jawaban atas pertanyaan anda tidak sesimple yg anda bayangkan. musti di sinkronisasikan ama persoalan (jenis app) yg sedang anda buat. coba anda jelentrehkan dulu, siapa tau rekan2 ada yg bisa bantu...

RE : Program yang mau saya buat adalah program aplikasi input data sederhana, dengan beberapa table. nah dari table2 ini nantinya akan diakses oleh tiap client. saya sudah buat aplikasi clientnya dengan componen koneksi menggunakan dcom, datasource, dan clientdataset pada data module. sementara untuk servernya saya menggunakan data module yang berisi adoconnection, adotable, & dataset provider. database yang saya pakai mssql 2000 (server lokal), pada komputer saya yang nantinya akan menjadi servernya. yang saya masih bingung 1. pada aplikasi client & servernya, apa saja yang harus disetting? 2. apa ada coding tambahan agar bisa koneksi? 3. aplikasi client sudah saya buat tapi masalah koneksinya ini yang agak ribet (maklum saya masih belajar :D ) kepada para master2 delphi mohon bantuannya ya....terima kasih sebelumnya

http://pascal-id.org/dpr/index.php?name=PNphpBB2&file=viewtopic&t=4698&highlight=client+server <--- double post nih... :) http://pascal-id.org/dpr/Downloads-index-req-viewdownloaddetails-lid-77.pas <--- untuk koneksi ke database mssql2000 mungkin begini... @adams2610 bisa bikin databasenya dulu lalu bikin app untuk konek ke mssql 2000 bisa liat dari link diatas untuk koneksi ke database mssql2000 atau bisa manfaatkan component zeosdb bisa di search di sf.net nah setelah berhasil terkoneksi bikin untuk client..

saya bisa kasih untuk menggunakan componen zeosdb untuk koneksi ke database yang di gunakan zconnection,ztable bikin file fault.cfg yang isinya HOST=127.0.0.1 USERNAME=test DATABASE=test PASSWORD=test PORT=3306 ini untuk codenya

uses system,sysutils,classes;
procedure loading;
var df: tstringlist;
path,fhost,fuser,fpass,fdb,fip,fport:string;
yui:integer;
begin
path:=extractfiledir(application.exeName);
df:=tstringlist.Create;
try
df.LoadFromFile(path+'\fault.cfg');
except
halt;
end;
for yui:= 0 to df.Count - 1 do
begin
if pos('HOST=',uppercase(df[yui]))<>0 then
begin
  Fhost:=df[yui]; 
  delete(fhost,1,pos('=',fhost));
end;
if pos('USERNAME=',uppercase(df[yui]))<>0 then
begin
  Fuser:=df[yui];
  delete(fuser,1,pos('=',fuser));
end;
if pos('DATABASE=',uppercase(df[yui]))<>0 then
begin
  Fdb:=df[yui]; 
 delete(fdb,1,pos('=',fdb));
end;
if pos('PASSWORD=',uppercase(df[yui]))<>0 then
begin
  Fpass:=df[yui]; 
 delete(fpass,1,pos('=',fpass));
end;
if pos('PORT=',uppercase(df[yui]))<>0 then
begin
   Fpass:=df[yui];
  delete(fport,1,pos('=',fport));
end;
end;
        with form1 do begin
        ZConnection1.HostName:=fhost;
        ZConnection1.User:=fuser;
        ZConnection1.Database:=fdb;
        ZConnection1.Password:=fpass;
        zconnection1.Connected:=true;
        Zdata.Active:=true;
    end;
end;

semoga membantu...

upzz lupa ....

procedure TForm1.FormCreate(Sender: TObject);
begin
loading;
end;

untuk manggilnya :)

duhh oon nih port di sesuaikan dengan yang di pake di mssql kalo tidak tau yaa isi aja 0.... semoga membantu mungkin ada yang mau tambahin