Получаю с 1С текстовый файл. Читаю его: [code]Local gnFileHandle,nSize,cString gnFileHandle = FOPEN(VDTXTFILE) *Поиск конца файла nSize = FSEEK(gnFileHandle, 0, 2) IF nSize <= 0 * Если файл пустой THIS.prj_AppName = '' THIS.prj_UserLogin = '' ELSE * Если файл не пустой,...
Очень хочется совместными усилиями допинать черновой проект (готового не было, если у кого есть - делитесь!). Написан по аналогии с корпоративными требованиями к языку Java, все префиксы взял из книги Славы Клепинина. Ну, может еще что-то добавил. Просьба - покритиковать...
код кнопки [code]DEFINE POPUP pop1 FROM 10,10 TO 20,30 FONT 'CourierNew',14 IN SCREEN PROMPT FIELD pop_sql.price ON SELECTION POPUP pop1 _vfp.activeform.ch_msp() ACTIVATE POPUP pop1 [/code] Подскажите, пожалуйста, чего не хватает, чтобы при выборе popup закрывался Вот тут пример https://forum.foxclub.ru/read.php?29,201856,201954#msg-201954 Вложения:...
Добрый день! Есть клиент-серверное решение использующее сокеты Winsock.OCX Нужно на клиенте перейти на API-шный вариант. Всякие socket()-connect()-sendData() победил. Остался вопрос по приему данных от сервера. Наверное можно по колхозному: запустить таймер и каждые 500 мс проверять буфер приема. Но хочется...
https://www.macrosoftinc.com/how-to-virtualize-your-vfp-application/?utm_content=f8722b9923ff6c305b83045e14d43283&utm_campaign=utm_campaign%3Dvirtualize&utm_source=Robly.com&utm_medium=email
Уважаемые знатоки! Понадобилось расширить работающую SQL-команду. Раньше команда была такая: [code]Select smetarab->nrazd, Min(razdel->naimrazd) As naimrazd, Sum(Round(smetarab->tekstoim,cop)) As sum_razd; from smetarab, razdel Where smetarab->nrazd=razdel->nrazd Group By smetarab->nrazd Order By smetarab->nrazd Into cursor tabrazd [/code] и она работала. После изменения (понадобилось увеличить...
добрый день, как очистить поле даты в таблице? через [code] update cur_cnt set ddk = '' или update cur_cnt set ddk = null [/code] не получается в 1 случае потому что поле дата а во 2 потому что поле не...
Уважаемые знатоки! Получил ошибку на этапе компиляции вот в таком выражении (сделанном на основе ранее работавшего): [code]Select smetarab->nrazd, Min(razdel->naimrazd) As naimrazd, SUM(ROUND(smetarab->tekstoim,cop)) as razdtekstiom,; from smetarab, razdel Where smetarab->nrazd=razdel->nrazd Group By smetarab->nrazd Order By smetarab->nrazd Into Cursor qurazd[/code] Получаю сообщение:...
Есть программка написанная на фоксе, используется более чем на 100 машинах домена. Начальство дало команду, заблокировать запуск программы пользователями. Не подскажите как грамотно это реализовать? Программа локальная, ни с чем не синхронизируется. Понимаю, что вопрос не совсем по фоксу. Но...
Приветствую всех! Как преобразовать поле типа datetime в binary(8)?