Привет !
Например у меня такой код. Какая именно функция отвечает за вывод значений
function main()
local gr, num, nm, code
netuse("spr_part",LoadPath()+"\sclad\spr_part.dbf",,.F.)
if (n:=spr_part-> cena_f_v)= 0 .and. (m:=spr_part->cena_p_v)= 0
Alert("Все верно ! Проверка прошла !")
else
Alert("У вас есть значение в карточке по полю валюта ! ")
end
gr:= (spr_part->GRUP)
//qinput(10,25,14,55,,,,,,,,,,,)
return 0
Как именно вывести это значение группы(например, У 1 ) на экран из этой таблицы и именно из текущей строки ?
Joined: 15 Mar 2002 Posts: 155 Location: Новиков Алексей Юрьевич Occupation: ПБОЮЛ Interests: Пермь
Posted: 01 Nov 2007 16:43 Post subject:
Добрый день.
Смотря как Вы хотите вывести это значение.
В самом простом случае можно использовать функцию
dispoutat(nLine,nCol,cText,cColor)
nLine и nCol - y и x координаты
cText - строка, которая выводится
cColor - цвет
Или просто написать что-то вроде:
@ 10,20 SAY gr PICTURE "XXXXX" COLOR "N/BG" _________________ С уважением, Новиков Алексей.
Добрый день !
Подскажите, плиз, как мне вывести много значений из таблицы по моим условиям. Код работает только на вывод 1 значения! Может быть я неправильно организовала свои циклы ???
function main()
local gr, num, nm
altd()
netuse("spr_part",LoadPath()+"\sclad\spr_part.dbf",,.F.)
if (n:=spr_part-> cena_f_v) <> 0 .and. (m:=spr_part->cena_p_v) <> 0
while !EOF()
for i:=1 TO (spr_part-> cena_f_v)
Alert("У вас есть значения в карточке по полю валюта ! Рекомендуется не вводить туда значения !")
gr:= (spr_part->GRUP)
num:= (spr_part->NNUM)
nm:= (spr_part->NAME)
n = DIALOG({"Группа ","Ном номер ", "Наименование "},
{gr,num,nm},{"99999","99999","9999999999999999"},"Данные по карточке партии ",{0,0,0})
next i
enddo
else
Alert("Проверка прошла! Все верно !")
end
return 0
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
