ATNEL tech-forum

Re: Pole tekstowe i zapisz pierwsze wprawki

2017-01-22T20:20:06+01:00

Tak to prawda, tematu baz danych jeszcze nie znam.
Poza tym w trakcie testów wyszło na jaw że po nowej instalacji programu wywala błąd.
Umieszczając instrukcję odczytu w "Activity_Resume" spowodowałem że program próbuje odczytać plik którego tam nie ma.
Poradziłem sobie dodając w "Activity_Create" następującą instrukcje:
[syntax=basic4gl]If File.Exists(File.DirRootExternal, "Od1") = True Then
Else
wan_addr = "Numer SIM"
File.WriteString(File.DirRootExternal, "Od1", wan_addr)
End If[/syntax]

Statystyki: Napisane przez Lernet — 22 sty 2017, o 20:20

Re: Pole tekstowe i zapisz pierwsze wprawki

2017-01-06T01:07:44+01:00

Z poprzednich postów nie wszystko rozumiałem więc poniżej przedstawiam swoją wariację na ten temat.

Potrzebowałem procedury która umożliwiałaby wprowadzenie nr. telefonu i jego zapamiętanie przez program.
Numer ten po tej operacji zapisu ma się wyświetlać w polu wprowadzenia oraz na labelu "wynik", poza tym ma być możliwość wykorzystania go jako zmiennej w innych częściach programu.

Musiałem w "Sub Globals" powołać kilka zmiennych: Od2, Od1, wynik,A1,EdNtelefonu.

W "Activity Resume" umieściłem procedurę odczytu zapisanego nr.tel. dzięki temu mam zawsze zmienną z aktualnymi danymi które wykorzystuję w innych częściach programu.
[syntax=basic4gl]Sub Activity_Resume
Od2=File.readstring ( File.dirRootExternal,"Od1" )
wynik.Text = Od2
End Sub[/syntax]
W tym miejscu jest realizowana procedura zapisu danych do pamięci telefonu pod nazwą "Od1"
[syntax=basic4gl]Sub Btnzapisz_LongClick
A1=EdNrtelefonu.Text
File.writestring( File.DirRootexternal,"Od1", A1 )
wynik.Text = EdNrtelefonu.Text
Return
End Sub[/syntax]
Pewnie mój kod ma wiele do życzenia, ale spełnia swoją funkcję i jest punktem wyjściowym do ulepszenia programu.

Statystyki: Napisane przez Lernet — 6 sty 2017, o 01:07

Re: Pole tekstowe i zapisz pierwsze wprawki

2015-11-06T17:57:09+01:00

Jakas zmienna tez można tak zapisać np: int,czy tylko string?
Ja każdy parę razy oglądałem:) Najlepiej wszystkie obejrzeć żeby od początku kumać o co chodzi.
Tak krótko
[syntax=basic4gl]str= " Twoj text "
edittext.text= str[/syntax]
Tu wyświetlisz to co wpisałeś wcześniej Jak klikniesz na to to możesz edytować .Zapisujesz jak Mirek napisał wcześniej .Następnie jak klikniesz na edittext to odczujesz i wyświetlasz.

Statystyki: Napisane przez grzeniu 73 — 6 lis 2015, o 17:57

Re: Pole tekstowe i zapisz pierwsze wprawki

2015-11-06T16:09:37+01:00

multitask napisał(a):

czy masz w planach ksążkę do B4A (jakaś biblia lub coś w tym rodzaju)

eee tam - wystarczy kilka poradników wideo .... wszystko będzie .... tylko na spokojnie

a zapis string do pliku jest prosty jak drut

[syntax=basic4gl]str = "jakiś string"
file.writestring( file.dirinternal, str )[/syntax]

trudne ?

a odczyt... ? jeszcze prostszy

[syntax=basic4gl]str = file.readstring( file.dirinternal )[/syntax]

to wsio

Statystyki: Napisane przez mirekk36 — 6 lis 2015, o 16:09

Re: Pole tekstowe i zapisz pierwsze wprawki

2015-11-06T15:56:29+01:00

Moze niedokładnie ,ale podpowiem jakbym ja to zrobił.
Robisz edittext jak klikniesz to wprowadzasz text ,przyciskasz przycisk zapisz i ten text przypisujesz do zmiennej string.
Jak włączasz aplikacje to wyświetlasz ta zmienna string .
Jak to zrobić znajdziesz w poradniku o terminalu.

Statystyki: Napisane przez grzeniu 73 — 6 lis 2015, o 15:56

Re: Pole tekstowe i zapisz pierwsze wprawki

2015-11-06T15:46:12+01:00

multitask napisał(a):

Ps. zamierzam zakupić pełną wersję programu

To co opisujesz można spokojnie zrobić i pobawić się na wersji demo b4a

multitask napisał(a):

tylko czy te dwa miesiące aktualizacji to nie jest błąd w opisie?

Jaki znowu błąd - toż masz dwie wersje różniące się ceną:

STANDARD
https://www.sklep.atnel.pl/pl/p/Basic4A ... andard/120
tu masz w cenie tylko dwa miesiące aktualizacji (jeśli się akurat pojawią w ciągu dwóch miesięcy od zakupu) - co w tym dziwnego ? bo nie rozumiem ? Pomimo, to że to nie są warunki Atnel tylko firmy Anywheresoftware

ENTERPRISE
https://www.sklep.atnel.pl/pl/p/Basic4A ... rprise/121
tu masz w cenie aż dwa LATA! aktualizacji (jeśli się akurat pojawią w ciągu dwóch lat od zakupu)

Statystyki: Napisane przez mirekk36 — 6 lis 2015, o 15:46