Var FileIni : TIniFile;
untuk write File Ini :
Fileini := TIniFile.Create('[Lokasi File ini]');
FileIni.WriteString('[Headernya]','[Fieldnya]','[Valuenya]');
FileIni.Free;
contoh:
FileIni := TIniFile.Create('C:\Cashflow.Ini');
FileIni.WriteString('Otorisasi','User_Name',ed_user.Text);
FileIni.WriteString('Otorisasi','Control',ADOQuery1['Control']);
FileIni.WriteString('Otorisasi','Control_View',ADOQuery1['Control_View']);
FileIni.WriteString('Otorisasi','User_Add',ADOQuery1['User_Add']);
FileIni.Free;
untuk read File Ini :
FileIni:=TiniFile.Create('[Lokasi File Ini]');
[VariableName]:=FileIni.ReadString('[Headernya]','[Fieldnya]','[Valuenya]');
FileIni.Free;
contoh:
FileIni:=TiniFile.Create('C:\Cashflow.Ini');
User_name:=FileIni.ReadString('Otorisasi','User_Name','');
Control:=FileIni.ReadString('Otorisasi','Control','');
Control_View:=FileIni.ReadString('Otorisasi','Control_View','');
User_Add:=FileIni.ReadString('Otorisasi','User_Add','');
FileIni.Free;
----- Original Message -----
From: "zaenal a" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, November 03, 2004 12:49 AM
Subject: [Delphindo] Ini Files
>
>
>
> hi, saya orang baru nih.
>
> mo nanya tentang Tini Files, bagaiman bikin dan membuatnya n
> mengaksesnya gimana? pls, contoh.
>
> sudah baca di help, masih blm nyambung.
>
> zaenale
>
>
>
>
>
>
>
>
>
> Berlangganan: [EMAIL PROTECTED]
> Stop Berlangganan: [EMAIL PROTECTED]
> Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED]
> Yahoo! Groups Links
>
>
>
>
>
>
>
Berlangganan: [EMAIL PROTECTED]
Stop Berlangganan: [EMAIL PROTECTED]
Keluhan Milis(Unbouncing,spam,dll): [EMAIL PROTECTED]
| Yahoo! Groups Sponsor | |
|
|
Yahoo! Groups Links
- To visit your group on the web, go to:
http://groups.yahoo.com/group/Delphindo/
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
