Hubert Szcześniak

Hubert Szcześniak Wykładowca, Studium
Filar

Temat: AmBasic od czego zacząć?

Ja w temacie: od czego zacząć naukę programowania w tym języku? Jest do tego jakiś podręcznik lub poradnik w internecie?
Marek Pacan

Marek Pacan
http://symfoniadodat
ki.pl

Temat: AmBasic od czego zacząć?

Hej,

polecam zainstalować sobie demo któregoś z symfoniowych programów.
Warto pogmerać w dołączonej dokumentacji a potem w standardowych raportach.
Zabawy na dobry miesiąc:-)
Help, mimo, że momentami nieaktualny, naprawdę jest dobrym źrodłem informacji na start.
Potem potrzebny będzie dostęp do części dokumentacji 'dla dystrybutorów' lub dobry znajomy zajmujący się symfonią:-).

Poadrawiam
Marek
Hubert Szcześniak

Hubert Szcześniak Wykładowca, Studium
Filar

Temat: AmBasic od czego zacząć?

Mam taki problem:

Załóżmy, że mam następujące kody towarów: CA325/G, CA325/P, CA325/RAD

Jak zrobić, żeby polecenie w raporcie: tw.GetField("kod") brało pod uwagę tylko kod do "/"?

Czyli, żeby do dalszej obróbki w raporcie (w w/w przypadku) zawsze przechodziło tylko CA325.

Mam coś takiego:
int iPos = SetTaggedPos(FS)
string KodTowaru

baseTW tw
tw.GetRecById( GetLineId(iPos))

Buf = tw.GetField("kod")
Find Regular "^{*}//"

ShellExecute( KatalogFirmy() + "zdjecia\\" + "regular 1" + ".jpg", "OPEN" )

NoOutput()


Dlaczego nie działa?

Z góry dzięki za info.
HubertHubert Szcześniak edytował(a) ten post dnia 29.06.10 o godzinie 13:47
Marek Pacan

Marek Pacan
http://symfoniadodat
ki.pl

Temat: AmBasic od czego zacząć?

Hej,

stawiam na błąd w:

" + "regular 1" +

po zmianie na

" + (regular 1) +

działa.
Ale bym trochę po-if-ował ten kod.

np.
if (find regular "") then
costam cośta
else
coś nie wyszło bo np. kod nie ma znaczka /
endif

i tym podobne.
W tej formie kod będzie malo bezpieczny.

Pozdrawiam
Marek

Hubert Szcześniak:
Mam taki problem:

Załóżmy, że mam następujące kody towarów: CA325/G, CA325/P, CA325/RAD
>
Hubert Szcześniak

Hubert Szcześniak Wykładowca, Studium
Filar

Temat: AmBasic od czego zacząć?

Już do tego doszedłem, że trzeba jeszcze po ifować :-]
Ale i tak wielkie dzięki za podpowiedź.
Nie lubię być noobem :-/

He, he zrobiłem:
int iPos = SetTaggedPos(FS)

baseTW tw
tw.GetRecById( GetLineId(iPos))

Buf = tw.GetField("kod")

If (Find Regular "^{*}//") Then
ShellExecute( KatalogFirmy() + "zdjecia\\" + (Regular 1) + ".jpg", "OPEN" )
Else
ShellExecute( KatalogFirmy() + "zdjecia\\" + Buf + ".jpg", "OPEN" )
EndIf

NoOutput()
Hubert Szcześniak edytował(a) ten post dnia 30.06.10 o godzinie 08:11

Następna dyskusja:

dokumentacja AmBasic




Wyślij zaproszenie do