Amigos,
Não estou conseguindo ler uma tabela que tem um campo MEMO.
Simplesmente não retorna nada, não sei se estou fazendo direito, segue abaixo como estou tentando:
MemoEdit(DB1->OBS) - retorna uma janela do MemoEdit vazia.
Então tentei:
....
....
@1,1 get oGet VAR cVar MEMO SIZE 250,100 OF hWnd - também retorna vazia.
Está compilado com a LIB _DBFCDX (não sei se isso tem alguma coisa a ver, pois fiz um programinha em Clipper puro e leu na boa o campo MEMO).
Valeu,
Roberto Calado
Ler Campo MEMO
Moderador: Moderadores
Só para constar:
Vc lembrou que quando esta usando clipper com NTX o arquivo memo é o DBT e quando usa o CDX o arquivo memo é o FPT?
Se vc abre o arquivo com o DBU normal e consegue abrir o campo memo com as informações, elas estão gravadas no DBT.
Vc vai ter que converter seus dados.
Vc lembrou que quando esta usando clipper com NTX o arquivo memo é o DBT e quando usa o CDX o arquivo memo é o FPT?
Se vc abre o arquivo com o DBU normal e consegue abrir o campo memo com as informações, elas estão gravadas no DBT.
Vc vai ter que converter seus dados.
"TRS-80/Sincler/Apple/PC - Clipper Winter 85, tlink 1.0 [pc 10 MHz - 640K] {NEZ 8000 2Kb RAM}"
{POG - Programação Orientada a Gambiarra}
{POG - Programação Orientada a Gambiarra}
-
Euclides
- Usuário Nível 3

- Mensagens: 154
- Registrado em: 12 Mai 2007 14:07
- Localização: São Paulo, Capital
Roberto,
Para mim isso funciona:
USE DB1 EXCLUSIVE
cTxt=DB1->obs
DEFINE WINDOW oWnd ...
...
DEFINE BUTTONBAR oBar 3DLOOK SIZE 35, 35 RIGHT OF oWnd
...
@ 43,4 BTNBMP OF oBar SIZE 30, 28 PROMPT "Edt." ;
ACTION iif(MemoEdit(@cTxt), (DB1->obs:=cTxt, oGet:Refresh()),)
...
@ 4,10 GET oGet VAR cTxt SIZE 386, 495 PIXEL MEMO OF oWnd
ACTIVATE...
compilo meus programas com /n/a/v/w
(digo isso por causa do DB1->obs:=cTxt)
clicando no OK do MemoEdit, altera o campo e mostra no GET
Parece ser um problema com o CDX mesmo.
Se tentar alterar o campo MEMO, podermos ver o erro que dá.
T+
Euclides
Para mim isso funciona:
USE DB1 EXCLUSIVE
cTxt=DB1->obs
DEFINE WINDOW oWnd ...
...
DEFINE BUTTONBAR oBar 3DLOOK SIZE 35, 35 RIGHT OF oWnd
...
@ 43,4 BTNBMP OF oBar SIZE 30, 28 PROMPT "Edt." ;
ACTION iif(MemoEdit(@cTxt), (DB1->obs:=cTxt, oGet:Refresh()),)
...
@ 4,10 GET oGet VAR cTxt SIZE 386, 495 PIXEL MEMO OF oWnd
ACTIVATE...
compilo meus programas com /n/a/v/w
(digo isso por causa do DB1->obs:=cTxt)
clicando no OK do MemoEdit, altera o campo e mostra no GET
Parece ser um problema com o CDX mesmo.
Se tentar alterar o campo MEMO, podermos ver o erro que dá.
T+
Euclides

