Jump to content

Ini Ile Dosya Yolu Kaydedip Geri Çekmek


kimtakar
 Share

Recommended Posts

ustalar projede açıkca anlatmaya çalıştım takıldığım yeri,

projede bir resim var ve bu resime sağ tıkladığımda

1.simge seç

2.oyun seç

şeklinde bir menü açılıyor simge olayını halletim kendi çapımca

ancak oyun seçme olayını başaramadım,

 

durum şu:

projenin kök dizininde

oyunlar adında bir klasörüm var ve bu klasör içinde portable olan herangi bir oyun var

ben resime sağ tıklayıp "oyun seç" dediğimde, oyunlar klasöründeki oyunu seçicem ve resime 

sol tıklama yaptığımda oyun açılıcak, bunu yapamadım çok kolay olabilir ama kafam durdu.

 

oyunun dosya yolu

örn=oyunlar/nfs/msw.exe

 

bunu iniye kaydetmem gerek ama yapamadım

 

 

örn çalışma:

http://yadi.sk/d/pGkoXqsP9xGTx

 

 

yeni konu:

http://www.tnctr.com/topic/233270-ebed-amiralv11-gelithtirme/

Edited by kimtakar
Link to comment
Share on other sites

Sag clike

------------------

Mouse = System.GetMousePosition(true, nil);
tblMenu = {};
tblMenu[1] ={};
tblMenu[1].Text = "İcon Sec";
tblMenu[1].ID = 01;
tblMenu[1].Checked = false;
tblMenu[1].Enabled = true;
tblMenu[1].IconID = 1;
tblMenu[2] ={};
tblMenu[2].Text = "Program Sec";
tblMenu[2].ID = 02;
tblMenu[2].Checked = false;
tblMenu[2].Enabled = true;
tblMenu[2].IconID = 2;
aaa = Application.ShowPopupMenu(Mouse.X+5, Mouse.Y+30, tblMenu, TPM_LEFTALIGN, TPM_VCENTERALIGN, true, true);
if(aaa == 1)then
tDosya = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "All Files (*.*)|*.*|", "", "dat", true, false);
if tDosya[1] ~= "CANCEL" then
dosya = String.SplitPath(tDosya[1]);
StatusDlg.Show()
File.Copy(tDosya[1], _SourceFolder .. "\\img\\icon\\oyunlar\\" .. dosya.Filename .. dosya.Extension, false, true, false, true, nil)
StatusDlg.Hide()
INIFile.SetValue(_SourceFolder .. "\\img\\icon\\oyunlar\\oyun.ini", "resim", "yol1", dosya.Filename .. dosya.Extension)
end
 
elseif aaa == 2 then
kimtakar = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "All Files (*.*)|*.*|", "", "dat", true, false);
if kimtakar[1] ~= "CANCEL" and kimtakar ~= "" then
INIFile.SetValue(_SourceFolder .. "\\AutoPlay\\Docs\\kimtakar.ini", "kimtakar", "1", kimtakar[1])
end
end
 
 
On Clike
-----
kimtakar = INIFile.GetValue(_SourceFolder.."\\AutoPlay\\Docs\\kimtakar.ini", "kimtakar", "1");
 
File.Open(kimtakar, "", SW_SHOWNORMAL);
 
Yeterli
Link to comment
Share on other sites

 

Sag clike

------------------

Mouse = System.GetMousePosition(true, nil);
tblMenu = {};
tblMenu[1] ={};
tblMenu[1].Text = "İcon Sec";
tblMenu[1].ID = 01;
tblMenu[1].Checked = false;
tblMenu[1].Enabled = true;
tblMenu[1].IconID = 1;
tblMenu[2] ={};
tblMenu[2].Text = "Program Sec";
tblMenu[2].ID = 02;
tblMenu[2].Checked = false;
tblMenu[2].Enabled = true;
tblMenu[2].IconID = 2;
aaa = Application.ShowPopupMenu(Mouse.X+5, Mouse.Y+30, tblMenu, TPM_LEFTALIGN, TPM_VCENTERALIGN, true, true);
if(aaa == 1)then
tDosya = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "All Files (*.*)|*.*|", "", "dat", true, false);
if tDosya[1] ~= "CANCEL" then
dosya = String.SplitPath(tDosya[1]);
StatusDlg.Show()
File.Copy(tDosya[1], _SourceFolder .. "\\img\\icon\\oyunlar\\" .. dosya.Filename .. dosya.Extension, false, true, false, true, nil)
StatusDlg.Hide()
INIFile.SetValue(_SourceFolder .. "\\img\\icon\\oyunlar\\oyun.ini", "resim", "yol1", dosya.Filename .. dosya.Extension)
end
 
elseif aaa == 2 then
kimtakar = Dialog.FileBrowse(true, "Locate File", _DesktopFolder, "All Files (*.*)|*.*|", "", "dat", true, false);
if kimtakar[1] ~= "CANCEL" and kimtakar ~= "" then
INIFile.SetValue(_SourceFolder .. "\\AutoPlay\\Docs\\kimtakar.ini", "kimtakar", "1", kimtakar[1])
end
end
 
 
On Clike
-----
kimtakar = INIFile.GetValue(_SourceFolder.."\\AutoPlay\\Docs\\kimtakar.ini", "kimtakar", "1");
 
File.Open(kimtakar, "", SW_SHOWNORMAL);
 
Yeterli

 

işte budur

edit: hocam kök dizin olarak "\\oyunlar\\" klasörünü yazdırmayızmı? yani c:\falan\filan...  değilde \oyunlar\gta\başla.exe olarak yani


Amacın böyle bir şey yapmak mı? 

 

http://www.tnctr.com/topic/231092-oyun-arthiv-sql-projesi/

öyle bişey değil hocam paylaşıcam bikaç güne kadar  projeyide

Edited by kimtakar
Link to comment
Share on other sites

 

"\\oyunlar\\" klasörünü yazdırmayızmı? yani c:\falan\filan...  değilde \oyunlar\gta\başla.exe olarak yani

 

Burada INIFile.SetValue(_SourceFolder .. "\\AutoPlay\\Docs\\kimtakar.ini", "kimtakar", "1", kimtakar[1]) istediğin klasörü belirt

Mesela

INIFile.SetValue(_SourceFolder .. "\\AutoPlay\\Oyun\\kimtakar.ini", "kimtakar", "1", kimtakar[1])

Docs Klasörüne değil AutoPlay klasörünün içerisindeki Oyun klasörüne kaydedecek

 

Şöyle yapabilirsin

INIFile.SetValue(_SourceFolder .. "\\Oyun\\kimtakar.ini", "kimtakar", "1", kimtakar[1])

 

Veriyi alırkende

kimtakar = INIFile.GetValue(_SourceFolder.."\\Oyun\\kimtakar.ini", "kimtakar", "1"); olursa işini görür.

 

Hala anlamadım diyorsan yine yardımcı olalım.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...