Deutsch

Воспоминания лисица, 09.05.2024

09.05.24 23:52
Re: Воспоминания лисица, 09.05.2024
 
uscheswoi_82 коренной житель
uscheswoi_82

Чтобы клиент, которому ПО было продано мог запускать ваше приложение, нужно запустить следующую команду примерно вот так:

vfp7.exe -T myproj.app


Чтобы записать информацию из текстовых полей в таблицу, нужно выполнить следующее, есть допустим таблица CDS, и там есть следующие поля cd_id, description, и year:

IF !USED("cds") THEN
  USE cds IN 0
ENDIF
SELECT cds
APPEND BLANK 
REPLACE cd_id WITH thisform.txtCd_id.Value IN cds
REPLACE description WITH thisform.txtDescription.Value IN cds
REPLACE year WITH thisform.txtyear.Value IN cds


А чтобы перемещаться по записям:

Назад:

IF NOT BOF()
  SKIP -1
  thisform.Refresh()
ENDIF


Вперёд:

IF NOT EOF()
  SKIP 1
  thisform.Refresh()
ENDIF
Если я кому-то отвечаю, это не значит что я ему симпатизирую, каждый остаётся при своём мнение Дневник тяжелобольного инвалида
 

Перейти на