List Info

Thread: YAZ + DELPHI How to get the detail of records?




YAZ + DELPHI How to get the detail of records?
user name
2007-01-03 17:42:44

      My problem was that the call to function  ZOOM_record_get  was incorrect and its returns a NIL VALUE. Now everything is ok and I finished my client.

      I would like to  thank a Mr. Rodrigo Kiguti, Kosmas Giannis, Jean Pierre and everbody that help me for yours very  helpful comments, suggestions, improvements, and corrections to my program.

     []s.

Wellington

lists.indexdata.dk">yazlist-requestlists.indexdata.dk escreveu:
kebab.indexdata.dk">
Today's Topics:

   1. Re: YAZ + DELPHI How to get the detail of records?
      (Rodrigo Kiguti)


----------------------------------------------------------------------

Message: 1
Date: Mon, 1 Jan 2007 04:32:45 -0800 (PST)
From: Rodrigo Kiguti yahoo.com"><rkigutiyahoo.com&gt;
Subject: Re: [Yazlist] YAZ + DELPHI How to get the detail of records?
To: "Discussion on the YAZ Z39.50 toolkit"
	lists.indexdata.dk">&lt;yazlistlists.indexdata.dk>;
Message-ID: web55612.mail.re4.yahoo.com"><;514377.93058.qmweb55612.mail.re4.yahoo.com>
Content-Type: text/plain; charset=iso-8859-1

Search for "ISO2709". It is the layout of the record.

--- bczm.ufrn.br">welbczm.ufrn.br wrote:

  
Hi Jean Pierre,

	After christmas we come back to work. I agree with
you is very usefull
for the yaz Delph implementation that we share our
experiences and
problems here.

	I talked with Rodrigo Kiguti and he explained for
me the problem with the
name of functions. As Giannis Kosmas said the Call 
to GetProcAddress was
incorrect.  I  replace the substring " at "  with
"" and my problem of
ACCESS VIOLATION is finish.

	I did a connection with a server Z39 without
problem. The Record Count of
a search is correct too. My problem now is how to
read the detail of each
record and put it on a STRING GRID?  Look the
program:

   FHOST := 'z3950.loc.gov';
   FPORT := 7090;

   q := 'attr 1=4 attr 4=1 "A brief history of
Merthyr"';
   type_spec := 'raw';
   q := UTF8Encode(q);
   r := ZOOM_connection_search_pqf(ZOOM_connection,
PChar(q));
   fRecordCount := ZOOM_resultset_size(r);
   ShowMessage('Recuperou ' +
IntToStr(fRecordCount)); // This line is OK

  // Loop

      for i := 0 to fRecordCount - 1 do
      begin
            ZOOM_Rec := ZOOM_resultset_record(r, i);
            zraw_record := ZOOM_record_get(ZOOM_Rec,
PChar(type_spec),len); // ZRAW_RECORD is NIL, what
is the
problem??

           …
      End;

       I need to Know how get the DETAIL of each
RECORD and show it in a
STRING GRID this way:

00714cam  22002411  4500
001 841223
005 19891016000000.0
008 780112s1973    bl       b    000 0 por
035    $9 (DLC)   77483165
906    $a 7 $b cbc $c orignew $d u $e ncip $f 19 $g
y-gencatlg
010    $a    77483165
040    $a DLC $c DLC $d DLC
043    $a s-bl---
050 00 $a LAW
100 1  $a Pires, Ariosvaldo de Campos.
245 12 $a A coaðc&auml;ao irresist&acirc;ivel no direito penal
brasileiro.
250    $a [2. ed.
260    $a Belo Horizonte, $b Editora Lemi, $c 1973]
300    $a xi, 72 p. $c 23 cm.
504    $a Bibliography: p. 69-72.
650  0 $a Violence (Law) $z Brazil.
650  0 $a Violence (Law)
991    $b c-LL $h LAW BRAZIL 7 Pire  $t Copy 1 $w
BOOKS


Any help would be appreciated

Regards

Wellington


    
//--------------------------------------------------------------------
  
From: "Lamon Jean-Pierre"
mediatheque.ch"><jpierre.lamonmediatheque.ch>
Hi,

I think it would be very usefull for the yaz Delph
implementation that you
share
your experiences here 

Regards
JP



_______________________________________________
Yazlist mailing list
lists.indexdata.dk">Yazlistlists.indexdata.dk

    
http://lists.indexdata.dk/cgi-bin/mailman/listinfo/yazlist
  


__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 



------------------------------

_______________________________________________
Yazlist mailing list
lists.indexdata.dk">Yazlistlists.indexdata.dk
http://lists.indexdata.dk/cgi-bin/mailman/listinfo/yazlist


End of Yazlist Digest, Vol 43, Issue 1
**************************************


  

[1]

about | contact  Other archives ( Real Estate discussion Medical topics )