Neurochirurgie minim invazivă
"Primum non nocere" este ideea ce a deschis drumul medicinei spre minim invaziv. Avansul tehnologic extraordinar din ultimele decenii a permis dezvoltarea tuturor domeniilor medicinei. Microscopul operator, neuronavigația, tehnicile anestezice avansate permit intervenții chirurgicale tot mai precise, tot mai sigure. Neurochirurgia minim invazivă, sau prin "gaura cheii", oferă pacienților posibilitatea de a se opera cu riscuri minime, fie ele neurologice, infecțioase, medicale sau estetice. www.neurohope.ro |
Salvare "stats"
Last Updated: Mar 07 2013 03:44, Started by
mariuss90
, Feb 27 2013 04:24
·
0
#1
Posted 27 February 2013 - 04:24
Buna,
Dupa ce am facut un program ce trebuie sa fac sa imi ramana setarile care le-am facut in el? De exemplu daca scriu ceva intrun textbox sau bifez un checkbox si ies din el cand intru inapoi sa fie bifat checkbox-ul si textbox-ul sa afiseze textul care era inainte sa ies din el. Daca stie careva sa imi dea un link unde scrie cum sa fac.Sau daca este ceva cod sa il scrie sau link. Sau cum se numeste procedura asta ca sa stiu ce sa caut, deoarece eu am cautat si nu am gasit ce am vrut sa fac, sunt incepator si nu stiu toate notiunile. Folosesc Visual Studio 2010. Multumesc anticipat. |
#2
Posted 27 February 2013 - 09:43
Orice textbox sau checkbox au asociate cate o variabila. Tot ce trebuie sa faci e sa pastrezi informatia din variabile nealterata.
|
#3
Posted 27 February 2013 - 12:41
in 2010 (.NET) nu stiu
dar in cel clasic aveam o chestie Save Settings, care se folosea de registri |
#4
Posted 27 February 2013 - 15:04
daca este vorba strict despre variabilele introduse sau procesate, functie de complexitatea programului se pot stoca intr-un fisier txt sau daca se impune intr-o baza de date.
ele vor fi incarcate si atribuite unor controale sau variabile functie de necesitati, la pornirea programului. daca este vorba despre setari ale aplicatiei, un fisier de tip .ini este ceea ce ai nevoie. pentru prima situatie totul depinde de tine, pentru cealalta cauta si tu pe net lucrul cu "ini files in vb2010" si gasesti tot ceea ce vrei sa stii. uite si un link de inceput http://msdn.microsof...613(VS.80).aspx |
#5
Posted 27 February 2013 - 18:33
Multumesc de ajutor.
Am gasit ceva folositor , nu exact ce cautam, dar merge . nexusm, on 27 februarie 2013 - 15:04, said:
daca este vorba strict despre variabilele introduse sau procesate, functie de complexitatea programului se pot stoca intr-un fisier txt sau daca se impune intr-o baza de date. ele vor fi incarcate si atribuite unor controale sau variabile functie de necesitati, la pornirea programului. daca este vorba despre setari ale aplicatiei, un fisier de tip .ini este ceea ce ai nevoie. pentru prima situatie totul depinde de tine, pentru cealalta cauta si tu pe net lucrul cu "ini files in vb2010" si gasesti tot ceea ce vrei sa stii. uite si un link de inceput http://msdn.microsof...613(VS.80).aspx Multumesc inca o data pentru raspunsuri. O zi buna. |
#6
Posted 07 March 2013 - 03:44
Foloseste-te de functiile astea doua:
Salveaza valoarea unui control intr-un fisier Parametrii: srcFisier=Destinatia fisierului unde sa salveze datele, srcNumeControl=numele controlului, srcValoareControl=valoarea controlului Public Sub SalveazaDate(srcFisier As String, srcNumeControl As String, srcValoareControl As String) Dim fdata As String If Dir(srcFisier) = "" Then Open srcFisier For Output As #1: Close #1 Open srcFisier For Input As #1 fdata = Input(LOF(1), #1) Close #1 If InStrB(1, fdata, srcNumeControl & "=" & srcValoareControl, vbBinaryCompare) = 0 Then Open srcFisier For Append As #1 Print #1, srcNumeControl & "=" & srcValoareControl Close #1 End If End Sub Returneaza valoarea controlului specificat in parametrul srcNumeControl Public Function CitesteDate(srcFisier As String, srcNumeControl As String) As String Dim ldata As String Open srcFisier For Input As #1 Do Until EOF(1) Line Input #1, ldata If InStrB(1, ldata, srcNumeControl, vbBinaryCompare) > 0 Then CitesteDate = Split(ldata, "=")(1): Exit Do Loop Close #1 End Function Exemplu: Command1_Click() SalveazaDate "saveme.txt", "TextBox1", "Ur Not In Danger!" End Sub Private Sub Form_Load() Text1.Text = CitesteDate("saveme.txt", TextBox1) End Sub Pot sa le mai stochezi si in registri, sa le bindezi in aplicatia ta sau cu API pentru fisiere de configurare (*.ini) daca folosesti Win Edited by horohoro, 07 March 2013 - 03:49. |
Anunturi
▶ 0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users