On-line: PSP, гостей 0. Всего: 1 [подробнее..]
АвторСообщение
постоянный участник


Пост N: 490
Зарегистрирован: 13.10.05
ссылка на сообщение  Отправлено: 02.03.15 08:48. Заголовок: Непонятки с фильтром в МиниГуи


Есть большой проект, консольный на хХарбоур 1, все работает. Выдрал из него один блок и сделал на МиниГуи .
Не работает и совсем простой участок

 цитата:

Select PRICE_S
nSyMkb:=0

set filter to
go top
set filter to (KSG_CODE =nKsgMkb )
go top
if !eof()
nSyMkb:=PRICE_S->Tarif
FrmGL.List_1.AddItem('PRICE_S->Tarif =',Str(PRICE_S->Tarif,15,2))
else
FrmGL.List_1.AddItem('Тариф Не найден !, nKsgMkb '+Str(nKsgMkb,3)+' и дата '+Dtos(dDatEnd))


Условие !eof() выполняется, но переменной nSyMkb значение не присваивается.


Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 4 [только новые]


администратор




Пост N: 486
Зарегистрирован: 20.02.11
ссылка на сообщение  Отправлено: 02.03.15 11:05. Заголовок: Vlad04 пишет: Не ра..


Vlad04 пишет:

 цитата:
Не работает и совсем простой участок



МиниГуи тут не причем , это всего лишь графическая морда. Может проблема в том что в Harbour что то работает не так, как в xHarbour 1

Натыкай контрольных точек и проверь
1 Ставится ли фильтр
set filter to (KSG_CODE =nKsgMkb )
go top
n := 0
Dbeval({|| n++})
MsgDebug(n) // число записей попавшее в фильтр
go top

2 что присваивается nSyMkb:=PRICE_S->Tarif
MsgDebug(PRICE_S->Tarif)



Спасибо: 0 
ПрофильЦитата Ответить
moderator




Пост N: 730
Зарегистрирован: 11.02.10
ссылка на сообщение  Отправлено: 02.03.15 11:34. Заголовок: Haz пишет: МиниГуи ..


Haz пишет:

 цитата:
МиниГуи тут не причем


Присоединяюсь

Vlad04 пишет:

 цитата:
Есть большой проект, консольный на хХарбоур 1


Встречный вопрос: а что Вам мешает использовать МиниГуи вместе с xHarbour?

Спасибо: 0 
ПрофильЦитата Ответить
постоянный участник


Пост N: 491
Зарегистрирован: 13.10.05
ссылка на сообщение  Отправлено: 02.03.15 14:00. Заголовок: Спасибо! Все оказало..


Спасибо! Все оказалось просто - элементарная моя описка.


 цитата:
Встречный вопрос: а что Вам мешает использовать МиниГуи вместе с xHarbour?


А Ide работу с xHarbour поддерживает?
Пробовал с xHarbour, который идет в Вашей поставке, изменил все настройки в IDE.
Но получаю сообщение об ошибке

 цитата:
Error E:\_PROGI\_MING\_X3F28~1\_Temp.Bc 2: Command syntax error




Спасибо: 0 
ПрофильЦитата Ответить
moderator




Пост N: 732
Зарегистрирован: 11.02.10
ссылка на сообщение  Отправлено: 03.03.15 13:59. Заголовок: Vlad04 пишет: А Ide..


Vlad04 пишет:

 цитата:
А Ide работу с xHarbour поддерживает?


Вы правы, Ide не работает сейчас с xHarbour
Но Вы можете попробовать использовать для сборки проекта под xHarbour утилиту MPM из поставки Минигуи (лежит в папке \Utils\MPM).

Спасибо: 0 
ПрофильЦитата Ответить
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 168
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет