Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   El Path del Alias... (https://www.clubdelphi.com/foros/showthread.php?t=27470)

Gabriel2 21-11-2005 22:21:30

El Path del Alias...
 
Hola a todos. Imaginemos que tengo un Alias en el DBE llamado 'Gestión'. Yo quiciera saber cual es la ruta o path de ese Alias y el unico dato que tengo es su nombre 'Gestion'. Alguna ideita...

marcoszorrilla 21-11-2005 22:32:41

Aquí tienes un ejemplo:
Código Delphi [-]
 unit Unit1;
 
 interface
 
 uses
   Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
   StdCtrls, DbTables;
 function RutaAlias(Const alias:String):string;
 type
   TForm1 = class(TForm)
     Button1: TButton;
     procedure Button1Click(Sender: TObject);
   private
     { Private declarations }
   public
     { Public declarations }
   end;
 
 var
   Form1: TForm1;
 
 implementation
 
 {$R *.DFM}
 
 procedure TForm1.Button1Click(Sender: TObject);
 begin
 ShowMessage(RutaAlias('JS'));
 end;
   function RutaAlias(Const alias:String):string;
   var cam:TStringList;
 
   begin
   cam:=Tstringlist.Create;
         Try
         Session.GetAliasParams(alias, cam);
         result:= cam.Values['PATH'];
         finally
         cam.Free;
         end;
   end;
 end.

Un Saludo.

Gabriel2 21-11-2005 22:42:40

Saludos y Gracias...
 
Gracias. Muchas gracias por la ayuda... :D


La franja horaria es GMT +2. Ahora son las 13:58:02.

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