ayuda con cookie

[dgallardov]

me respondo a mi mismo, le puede ayudar a alguien que necesite la informacion, yo necesitaba leer el id_cookie = 31

esta es la cookie:

id_cookie
31
localhost/sistema/
1536
4041818112
30023753
2021306912
29950328
*
tipo_vista
1
localhost/sistema/
1536
4041818112
30023753
2021306912
29950328
*
tipo_impresion
1
localhost/sistema/
1536
4041818112
30023753
2021306912
29950328
*

el codigo en delphi seria el siguiente usando wininet:

procedure obtener_id_cookie();
var
valor:dword;
valorCookie: array[0..1000] of char;


begin
valor:=255;
InternetGetCookie('http://localhost/sistema/','test',valorCookie,valor);
id_club_cookie:=copy(valorCookie,16,2);
end;

donde el primer parametro es la url que tiene la cookie, en valorCookie vuelven las 3 variables de la cookie con su respectivo valor de esta manera:

'id_cookie=31;tipo_vista=1;tipo_impresion=1'

despues rompi la cadena y obtube el id_cookie que necesitaba.

saludos