| Author |
Message |
taz50 |
| Location: |
|
Post subject: Hubungan ComBoBox dengan File Ekstensi Ini
 Posted: 27/Jan/2009 15:19
|
|
onNewBie
Joined: 27-Jan-2009
Posts: 3
Status: Offline
|
|
Saya bingung dengan coding berikut:
procedure TForm1.FormShow(Sender: TObject);
Var
myIniFile:TIniFile;
i:integer;
TempStr:string;
begin
try
myIniFile:=TIniFile.Create(Setup_config);
ComBoBox1.ItemIndex:= myIniFile.ReadInteger('com','comname',0);
ComBoBox2.ItemIndex:= myIniFile.ReadInteger('com','combaudrate',1);
finally
myIniFile.Free;
end;
end;
yang mau saya tanyakan tentang Combox1, di prosedur Combox1 tidak ada detail tentang TCP, com1, com2.. tp programnya bs muncul kayak gini..
yg mau saya tanyakan:
1. hubungan TIniFile dengan Tcombox sehingga bisa tampil seperti gambar di atas?
2. Itu simpen data TCP, USB, Com1, Com2, untuk yg ditampilin di Combox disimpan dmn?
Trimakasih |
|
|
| |
|
|
|
 |
|
|
|
Post subject: RE: Hubungan ComBoBox dengan File Ekstensi Ini
Posted: 27/Jan/2009 15:53
|
|
onMage
Joined: 06-Feb-2006
Posts: 2401
|
|
dibagian lain pasti ada code utk menampilkan list tsb (TCP/IP, USB, COM1 ...), coba check di event onCreate, atau di event dimana form tersebut dibuat 
1. Ini file menyimpan seting terakhir (ItemIndex dari combox tsb)
2. Mungkin tidak perlu disimpan, kebanyakan baca langsung dari konfigurasi system (misal: apakah system support TCP/IP, USB, baca berapa banyak COM-port yang terinstall dll) |
_________________
Dude, if you don't understand the basics and just want to get someone else write the code for you, it means you really shouldn't study computer science. Find a different field.
 http://delphiexpert.wordpress.com
|
| |
|
|
|
|
|
supermuam |
| Location: |
|
|
Post subject: RE: Hubungan ComBoBox dengan File Ekstensi Ini
Posted: 27/Jan/2009 15:56
|
|
onKnowledgeable
Joined: 20-Feb-2008
Posts: 131
Status: Offline
|
|
kayaknya itu script buat mbaca ini file kemudian dimasukan ke dalam combobox.
isi data nya mungkin ada di file setup_config.biasanya inifile disimpan dalam satu folder dengan exe. |
_________________
....No Pain No Gain...
|
| |
|
|
|
|
|
ichan29 |
| Location: |
|
|
Post subject: Re: Hubungan ComBoBox dengan File Ekstensi Ini
Posted: 27/Jan/2009 16:31
|
|
onProfessional
Joined: 23-Feb-2007
Posts: 603
Status: Offline
|
|
|
taz50 wrote:
Saya bingung dengan coding berikut:
procedure TForm1.FormShow(Sender: TObject);
Var
myIniFile:TIniFile;
i:integer;
TempStr:string;
begin
try
myIniFile:=TIniFile.Create(Setup_config);
utk bagian diatas, terutama yg diwarnai, keliatannya anda salah tulis atau gimana, karena TIniFile.Create --> harusnya String
sy yakin klo dicompile itu akan error.
bisa seperti ini: myIniFile:=TIniFile.Create('Setup_config.ini');
Trus semua itu muncul karena configurasi isi dari nama2com itu ditulis difile setup_config itu bisa extention ini atau yg lainnya. |
|
|
| |
|
|
|
|
|
ichan29 |
| Location: |
|
|
Post subject: RE: Re: Hubungan ComBoBox dengan File Ekstensi Ini
Posted: 27/Jan/2009 16:33
|
|
onProfessional
Joined: 23-Feb-2007
Posts: 603
Status: Offline
|
|
| bisa saja ditulis spt itu tp dg catatan, Setup_config: adalah variable String yg sudah didefinisikan sebelumnya. |
|
|
| |
|
|
|
|
|
taz50 |
| Location: |
|
|
Post subject:
Posted: 27/Jan/2009 16:47
|
|
onNewBie
Joined: 27-Jan-2009
Posts: 3
Status: Offline
|
|
maap2
utk Setup_config coding diatasnya ada const seperti ini
const
Setup_config = '..Demo_config.ini';
Tp yg untuk string '..Demo_config.ini' saya cari2 di codingnya gk ada lg..
'..Demo_config.ini' itu maksudnya apa ya? |
|
|
| |
|
|
|
|
|
|
|
Post subject:
Posted: 27/Jan/2009 16:52
|
|
onMage
Joined: 06-Feb-2006
Posts: 2401
|
|
| itu nama file ini nya mas |
_________________
Dude, if you don't understand the basics and just want to get someone else write the code for you, it means you really shouldn't study computer science. Find a different field.
http://delphiexpert.wordpress.com
|
| |
|
|
|
|
|
taz50 |
| Location: |
|
|
Post subject:
Posted: 27/Jan/2009 16:59
|
|
onNewBie
Joined: 27-Jan-2009
Posts: 3
Status: Offline
|
|
nanya lg nih..
file ini-nya itu muncul ketika sedang dieksekusi kemudian hilang
atau
file ini-nya di tempat tertentu
soalnya saya cari2 file ini-nya gk ada |
|
|
| |
|
|
|
|
|
herux |
| Location: Kediri |
|
|
Post subject:
Posted: 27/Jan/2009 17:11
|
|
onProfessional
Joined: 13-Jul-2006
Posts: 668
Location: Kediri
Status: Offline
|
|
|
|
|
|
|
|
|
Post subject:
Posted: 28/Jan/2009 09:39
|
|
onElite
Joined: 09-Oct-2005
Posts: 1313
Location: BeDeGe
|
|
|
taz50 wrote:
nanya lg nih..
file ini-nya itu muncul ketika sedang dieksekusi kemudian hilang
atau
file ini-nya di tempat tertentu
soalnya saya cari2 file ini-nya gk ada
file tidak di temukan berarti saat setelah file INI di-CREATE dan berakhir di FREE itu tidak ada penulisan data pada file tersebut. dan lokasi pada file yg di create itu berada pada WINDOWS directory (misal C:\WINDOWS) kenapa ? karena create file INI jika tidak di sertakan path-nya maka akan otomatis tercipta di WINDOWS directory
coba ini u/ memperlihatkan posisi file tersebut :
code : pascal const Setup_config = '..Demo_config.ini'; procedure TForm1.FormShow(Sender: TObject); Var myIniFile:TIniFile; i:integer; TempStr:string; begin try myIniFile:=TIniFile.Create(Setup_config); ComBoBox1.ItemIndex:= myIniFile.ReadInteger('com','comname',0); ComBoBox2.ItemIndex:= myIniFile.ReadInteger('com','combaudrate',1); myIniFile.WriteInteger('com','comname',2); if FileExists('C:\WINDOWS\' Setup_config) then ShowMessage('Found File: C:\WINDOWS\' Setup_config) else ShowMessage('File Not Found !'); finally myIniFile.Free; end; end;
|
_________________
website: http://darusmanaiman.net/
e-mail:
darusmanaiman@programmer.net
programmer@darusmanaiman.net
|
| |
|
|
|
|
|
|
