Arsip: Isi Edit Box tidak berubah
more 16 years ago
onsir
Bagaimana cara menyimpan data di suatu Edit box, tetapi tidak disimpan di
tabel database.
Misal Host name : pada saat dibuka berisi SERVER,
Lalu saya ketik Localhost lalu saya klik connect, Lalu saya close (exit dari program).
Dan pada saat di buka kembali isi dari Host name menjadi Localhost
atas bantuannya saya ucapkan terima kasih
more 16 years ago
w4h703
coba aja disimpan pake registry ato .Ini
so pada saat aplikasi jalan valuenya disimpan ke registry/ini
trus pada saat buka panggil aja.
more 16 years ago
onsir
saya dah buat file .INI
procedure TForm1.Button1Click(Sender: TObject);
Var Ini : TIniFile;
begin
with Application do
Ini := TIniFile.Create('d:\tes.ini');
Ini.WriteString('MastroWX','Host','LocalHost');
end;
lalu ingin membaca file yg sudah ada tetapi masih error
procedure TForm1.Button2Click(Sender: TObject);
var Ini : TIniFile;
Baris:String;
begin
Baris:= INI.ReadString('MastroWX','Host', 'default');
Edit3.Text :=Baris;
end;
end;
more 16 years ago
onsir
procedure TForm1.Button2Click(Sender: TObject);
var Ini : TIniFile;
Baris:String;
begin
with Application do
Ini := TIniFile.Create('d:\tes.ini');
Baris:= INI.ReadString('MastroWX','Host', 'default');
Edit3.Text :=Baris;
end;
end;
more 16 years ago
belajaraja
Salam
COba mas buat seperti ini :
procedure Tfrmkonfigurasi.btnsaveClick(Sender: TObject);
Var f: System.TextFile;
begin
AssignFile(f,GetCurrentDir+'/Koneksi.Txt');
Rewrite(f);
Writeln(f, SimpanPass(txtserver.Text)); //ServerName
CloseFile(f);
frmkonfigurasi.btnprogres.OnClick(nil);
end;
Saya menggunakan ado connection. Semoga dapat membantu
more 16 years ago
onsir
terima kasih sudah ketemu.
tp bagaimana klw file .INI tsb di simpan dlm satu folder dengan aplikasi kita tetapi nama file ini nya berbeda dengan nama file exe nya.
saya sdh pakai exename, GetCurrentDir tetapi masih blm sesuai.
more 16 years ago
belajaraja
salam
Maaf mas, saya ini masih bodoh dan masih harus banyak belajar lagi. Bisa tolong mas lebih memperjelas maksud pertanyaan mas ? kalo dari yang saya baca seperti nya itu tidak ada masalah kalo nama file.ini nya berbeda dengan nama file exe nya selama waktu memanggil file ini nya dengan benar.
terima kasih
more 16 years ago
ZeAL
coba rubah sedikit code yang udah jadi..
procedure TForm1.Button1Click(Sender: TObject); Var Ini : TIniFile; begin with Application do Ini := TIniFile.Create('ininamafilesemausaya.ini'); Ini.WriteString('MastroWX','Host','LocalHost'); end;Gak usah pake embel2 di pathnya.. cukup nama file aja.. atau...
procedure TForm1.Button1Click(Sender: TObject); Var Ini : TIniFile; begin with Application do Ini := TIniFile.Create(extractfilepath( application.ExeName ) + 'ininamafilesemausaya.ini'); Ini.WriteString('MastroWX','Host','LocalHost'); end;kalo pake exename, diambil path nya aja..
more 16 years ago
DelphiExpert
INIFileName:= ChangeFileExt(ParamStr(0), '.ini');
jika exe dikau ada di c:\myprogram\myprg.exe
INIFileName akan berisi c:\myprogram\myprg.inimore ...
- Pages:
- 1
reply |
Report Obsolete
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 3 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 3 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 4 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 11 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 11 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 11 years ago
Random Topic
- Penggajian PNS
by novankyoshi in Tip n Trik Pemrograman more 11 years ago - tanya connect database access k delphi
by kids in Tip n Trik Pemrograman more 16 years ago - [ASK] Bongkar kompresi file MP3
by suncen in Tip n Trik Pemrograman more 16 years ago - error report
by asiyrob in Enginering more 16 years ago - scanning
by agoes in Network, Files, I/O & System more 18 years ago - data tidak langsung terupdate di komputer lain
by $tring in Hal umum tentang Pascal Indonesia more 16 years ago - Project pdf
by yupi in Tutorial & Community Project more 16 years ago - Excel Report Group
by yogacute in Tutorial & Community Project more 14 years ago - Buat Planning donk !!!!
by EkoIndri in OOT more 18 years ago - ADO pada Delphi
by shindo in Hal umum tentang Pascal Indonesia more 17 years ago