Printable View
سلام
يه چندتا مشكل داشتم اگه ممكنه يه كمكي كنين
1.ميخواستم ببينم چطودي ميشه يه فايلي رو از مسيري(مثلا x:\xxx\yyy.ini)برنامه بخونه و مثلا a=bرو از توي اون فايل بخونه و رويb يه تغييري بده و بعدش اونرو بصورت همون a=b ذخيره كنه بدون اينكه براي ساير اجزاي اون فايل مزاحمتت و تغييري ايجاد كنه....
2.طريقه hideوShowكردن يك شي رو مثلا lable يا textbox
3.تريقه تعريف variable ها براي tipe هر object
4.طريقه ساخت يه tree استاتيك با ايكن كنار هر مورد...
با تشكر
توابع خاصي براي كار با اين فايل ها كه به آنها در اصطلاح Private Profile گفته مي شود وجود دارد(رجيستري ويندوز مرجع بهتري براي نگه داري اطلاعات است ولي قبلا از اين فايل ها استفاده مي شده و مي شود)
کد:
[boot loader]
timeout=5
default=multi(0)disk(0)rdisk(0)partition(1)\WINDOW S
[operating systems]
multi(0)disk(0)rdisk(0)partition(1)\WINDOWS="Windo ws XP Media Center Edition"
اين فيال ها از بخش ها يا section ها تشكيل شدند.مثلا نمونه فايل بالايي دو بخش دارد.
براي كار با اين گونه فايل ها از توابع زير استفاده مي شود:
کد:GetPrivateProfileSection
GetPrivateProfileString
WritePrivateProfileSection
WritePrivateProfileString
مهماش اين دو تاست
کد:
Private Declare Function GetPrivateProfileString Lib "kernel32" Alias _
"GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, _
ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, _
ByVal lpFileName As String) As Long
Private Declare Function WritePrivateProfileString Lib "kernel32" Alias _
"WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, _
ByVal lpString As Any, ByVal lpFileName As String) As Long
ممنون از راهنماييتون اگه ممكنه يه راهنمايي هم در مورد اينا بكنيد
.طريقه hideوShowكردن يك شي رو مثلا lable يا textbox
3.تريقه تعريف variable ها براي tipe هر object
4.طريقه ساخت يه tree استاتيك با ايكن كنار هر مورد...
و براي كار با اون توابعي كه معرفي كرديد بايد ابتدا فايل رو باز كنيم و بعد از اونا استفاده كنيم مگه نه..
نيازي نيست،خودش همه كرا رو ميكنه شما كافيه با دستوري مثل دستور زير به بافر بسازيد:نقل قول:
بعد مثل فراخواني زير ازش استفاده كنيد:کد:Private Const MAX_STRING = 255
Buffer = Space(MAX_STRING)
تو مثالي كه زدم فرض شده كه فايل MyINI.ini كنار فايل EXE كامپايل شده شما قرار داره و خطوط زيرتوش وجود دارن:کد:Dim Return As Long
Return = GetPrivateProfileString("Persian", "Entry1", "", Buffer, Len(Buffer), App.Path & "\MyINI.ini")
در اين صورت بعد از دستور گفته شده خواهيم داشتکد:[Persian]
Entry1=Something
کد:Buffer=Something
ممنون از كمكتون
اگه ميشه براي اينها هم يه راهنمايي كنيد
.طريقه hideوShowكردن يك شي رو مثلا lable يا textbox
3.تريقه تعريف variable ها براي tipe هر object
4.طريقه ساخت يه tree استاتيك با ايكن كنار هر مورد...
...مشكل دامين دات نت پي سي ورلد..........
اگه منظورتون از شي همون كنترل هاي وي بي هستن.از خاصيت Visible استفاده كنيد:نقل قول:
3 و 4 رو نفهميدم!!کد:Command1.Visible=False
منظورتون Tree viewهست؟
اره همين Tree view ها !!
خود وي بي اين قابليت رو پيش ساخته نداره اولا بايد يه ايميج ليست true color براش بسازي.
مي توني هم از كنترلاي موجود استفاده كني مثل اين:
http://majid-kntu.persiangig.ir/VB6_TreeView_Full_Source.rar
ممنون از كمكت ولي از اين كنترلها چطوري ميشه استفاده كرد چون من چندتا از اينا دانلود كردم فايلهايي با پسوندocx روهم ريجستر كردم ولي بازم هنگام باز كردن ميگه قادر به بازكردنشون نيست ....
اين ocx ها به همراه سورس Sample طرز به كاربردنشون هستن.شما مي تونيد از يه Image list ساده براي اين كار استفاده كنيد.اگه مي خواهيد آيكونها به سبك اكس پي(با Alpha chanel)باشند بايد از يه Image list سفارشي كه تو همين sample هست استفاده كنيد.ديگه خودتون بايد بتونيد از روي سورس اينو ياد بگيريد.
من يه imagelist درست كردم treevew هم درست كردم و ... ولي هنگام اجرا ميزنه بايد ايميج ليست رو قبل از استفاده اناليزش كنيد!!! چيكار كنم؟؟؟/
كمك كنين!!خواهشاًنقل قول:
من يه imagelist درست كردم treevew هم درست كردم و ... ولي هنگام اجرا ميزنه بايد ايميج ليست رو قبل از استفاده از پيش تعريفش كنيد!!! چيكار كنم؟؟؟/