Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5

Tanyan Source Code OpenVpn Buat Tunnel

#1
mau tanya ada yang punya source code openvpn buat digabungin di tunnel?
Reply
#2
saya ada tapi bukan untuk di publikasi. tunggu member lain aje sapatau punya :P
Reply
#3
(12-06-2014, 07:17 AM)ForNesiaFreak Wrote: saya ada tapi bukan untuk di publikasi. tunggu member lain aje sapatau punya :P
ane minta source load config aja dong mbah wah kabur
Reply
#4
(12-06-2014, 11:58 AM)Abah Wrote: ane minta source load config aja dong mbah wah kabur

load config kan biasa aja om


tambahin sOpenDialog1

Trus di tombol masukin kek gini :

Code:
procedure TForm1.LoadClick(Sender: TObject);
begin
if sOpenDialog1.Execute then
begin
myini := TIniFile.Create(sOpenDialog1.FileName);
config1.Text:= myini.ReadString('ForNesia SETTING', 'CONTOH', config1.Text);
end;
  end;


ini bisa dikasi bisa kaga di formcreate

Code:
with sOpenDialog1 do
    begin
    InitialDir:=ExtractFilePath(Application.ExeName);
    Filter:='Config ini (*.ini)|*.ini';
    end;
Reply
#5
(12-06-2014, 07:11 PM)ForNesiaFreak Wrote:
(12-06-2014, 11:58 AM)Abah Wrote: ane minta source load config aja dong mbah wah kabur

load config kan biasa aja om


tambahin sOpenDialog1

Trus di tombol masukin kek gini :

Code:
procedure TForm1.LoadClick(Sender: TObject);
begin
if sOpenDialog1.Execute then
begin
myini := TIniFile.Create(sOpenDialog1.FileName);
config1.Text:= myini.ReadString('ForNesia SETTING', 'CONTOH', config1.Text);
end;
  end;


ini bisa dikasi bisa kaga di formcreate

Code:
with sOpenDialog1 do
    begin
    InitialDir:=ExtractFilePath(Application.ExeName);
    Filter:='Config ini (*.ini)|*.ini';
    end;

Klo eror Invalid Filename itu knp?
Reply
#6
(12-12-2014, 02:33 PM)Abah Wrote:
(12-06-2014, 07:11 PM)ForNesiaFreak Wrote:
(12-06-2014, 11:58 AM)Abah Wrote: ane minta source load config aja dong mbah wah kabur

load config kan biasa aja om


tambahin sOpenDialog1

Trus di tombol masukin kek gini :

Code:
procedure TForm1.LoadClick(Sender: TObject);
begin
if sOpenDialog1.Execute then
begin
myini := TIniFile.Create(sOpenDialog1.FileName);
config1.Text:= myini.ReadString('ForNesia SETTING', 'CONTOH', config1.Text);
end;
  end;


ini bisa dikasi bisa kaga di formcreate

Code:
with sOpenDialog1 do
    begin
    InitialDir:=ExtractFilePath(Application.ExeName);
    Filter:='Config ini (*.ini)|*.ini';
    end;

Klo eror Invalid Filename itu knp?

coba di ss erornya om Smile
kali aja bisa bantu
Hanif123, proud to be a member of ForNesia Family since Aug 2015.
Reply
  


Possibly Related Threads…
Thread Author Replies Views Last Post
Question [ASK] Source code Duration eivf 2 2,130 05-19-2017, 06:41 PM
Last Post: eivf
  Need Source Code reizal 1 1,857 05-18-2017, 02:29 PM
Last Post: eivf