Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 12-01-2005
VRO VRO is offline
Miembro
 
Registrado: abr 2004
Posts: 230
Poder: 23
VRO Va por buen camino
Me respondo

POr si alguien le interesa, ya encontré como hacer el archivo INI, es muy fácil y en el ejemplo que puse en el hilo se ve claramante, lo que hace el ocecarse...... y estar cansada.

Pues bien aqui os paso en código la forma en el que lo hice:
Código:

function GetUser(S: String): String;
begin
  { Return a user value }
  { Could also be splitted into separate GetUserName and GetUserCompany functions }
  if S = 'Nombre y nif' then
    Result := UserPage.Values[0]
  else if S = 'Empresa' then
    Result := UserPage.Values[1]
  else if S = 'Direccion, población y provincia' then
    Result := UserPage.Values[2]
  else if S = 'Teléfono y fax' then
    Result := UserPage.Values[3];

  if S = 'Nombre Servidor' then
    Result := UsagePage.Values[0]
  else if S = 'Nombre usuario Base de datos' then
    Result := UsagePage.Values[1]
  else if S = 'Contraseña' then
    Result := UsagePage.Values[2];
end;


end.

[INI]
Filename: "{win}\Contadores1.ini"; Section: "REGISTRAR"; Key: "Nombre y Nif"; String: {code:GetUser|Nombre y nif}
Filename: "{win}\Contadores1.ini"; Section: "REGISTRAR"; Key: "Empresa"; String: {code:GetUser|Empresa}
Filename: "{win}\Contadores1.ini"; Section: "REGISTRAR"; Key: "Dirección, población y provincia"; String: {code:GetUser|Direccion, población y provincia}
Filename: "{win}\Contadores1.ini"; Section: "REGISTRAR"; Key: "Teléfono y fax"; String: {code:GetUser|Teléfono y fax}
Filename: "{win}\Contadores1.ini"; Section: "SERVIDOR"; Key: "Nombre Servidor"; String: {code:GetUser|Nombre Servidor}
Filename: "{win}\Contadores1.ini"; Section: "SERVIDOR"; Key: "Nombre usuario Base de datos"; String: {code:GetUser|Nombre usuario Base de datos}
Filename: "{win}\Contadores1.ini"; Section: "SERVIDOR"; Key: "Contraseña"; String: {code:GetUser|Contraseña}
Lo que he hecho es crear una función llamada GetUser que devuelve un String, este String es el que va a quedar grabado en el archivo.ini.Escribo la instruccion por cada uno de los datos que devuelve la funciín, es decir, por cada uno de los datos que quiero grabar en el INI

Espero que sirva de ayuda a alguien

Gracias por toda la ayuda que me han prestado
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 12:43:31.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi