SoloCodigo

solo hacer notar que para este codigo funcione, Excel debe estar instalado en la maquina donde se corra el programa
salu2

sure... el demo esta completisimo, bajate los demos, y el que buscas se llama... FTP

utilizas BDE para abrir las tablas?

la aplicacion se bloquea en cierto punto, o simplemente no puedes ejecutar el programa?

ni pex   ...haber si luego se animan... aqui hay quien les hace frente en Delphi y C#  

entonces si ya sabes como conectar todo, lo unico que falta es poner la propiedad Active de tu tabla a True

checate el metodo Scale... talvez te sirva

pictureBox1.Scale(2);

checate los eventos OnKeyDown, OnKeyPress de tu forma... ahi puedes hacer cualquier cosa cuando se presione cualquier tecla

en Delphi7 te conviene mucho mas usar los componentes ADO (paleta ADO)

pones un ADOConnection, le das doble click al componente, selecionas "Build", luego "Microsoft Jet 4.0 OLE DB Provider", Next, buscas tu base de datos de access y listo, ya tienes la conexion... ahora para ver algo

pones un ADOQuery en tu forma, le asignas la propiedad Connection al ADOConnection que pusiste antes, te vas a la propiedad SQL, le pones algo asi como
SELECT * FROM MITABLA

das OK, pones la propiedad Active a True y listo... ya tienes tu tabla... ahora si la quieres ver ahi mismo, te vas a la paleta Data Access, pones un componente DataSource, le asignas la propiedad DataSet al ADOQuery que pusiste ahorita

luego te vas a la paleta Data Controls, pones un componente DBGrid, asignas la propiedad DataSource al DataSource que pusiste ahorita y listo... fiuf... espero que hallas logrado entender algo de esto...

en Delphi, utilizando una variable de tipo TSearchRec

aqui esta una funcion que te regresa el tamaño de cualquier archivo:

function TamanoArchivo(const Archivo:string):Integer;
var S:TSearchRec;
begin
  Result:=-1; //default
  if (FindFirst('miarchivo.txt', faAnyFile, S)=0) then
  begin
    Result:=S.Size;
    FindClose(S)
  end
end;

function TamanoCarpeta(const Carpeta:string):Integer;
var S:TSearchRec;
begin
  Result:=0; //default
  if (FindFirst(IncludeTrailingBackslash(Carpeta)+'*.*', faAnyFile, S)=0) then
  repeat
    Inc(Result, S.Size);
  until (FindNext(S)<>0)
  else
    Result:=-1;
  FindClose(S)
end;


para encontrar el tamaño de una carpeta, no hay nada en windows que lo pueda hacer... tienes que ir archivo por archivo, sumando el tamaño de todos... similar al anterior

acostumbrate a usar Free en vez de Destroy, es mucho mas "educado"

asi es, la propiedad Anchors si existe para todos los controles visuales, basicamente lo unico que tienes que hacer es jugar con 2 propiedades

Align y Anchors

Align te permitira poner el componente arriba, abajo, izquierda, derecha o completa (client)
y cuando maximizas, o haces resize, los controles se mueven acordemente

cuando cambias Align los Anchors automaticamente se cambian, pero tu los puedes cambiar tambien, solo hay 4 propiedades aqui, akLeft, akTop, akRight, akBottom, basicamente cuando estan a True, quiere decir que el control se va a cambiar de tamaño cuando ese lado cambie (izq, derecha, arriba, abajo)

juega con esas propiedades

otra cosa muy comun es usar paneles para agrupar todos tus componentes, incluso se usa mucho tener paneles dentro de paneles... por ejemplo, una aplicacion puede tener un panel con Align alTop para todos los componentes que siempre van arriba en tu form, y otro panel con Align alClient para todo el detalle
dentro del panel con alClient puedes tener otros paneles con alLeft, otro con alClient, etc... prueba eso y veras como todos tus componentes se mueven acordemente como tu quieres...

al final de esa funcion no olvides llamar
sArchivo.Free;

para evitar memory leaks

de preferencia debe hacerse asi:

sArchivo:=TStringList.Create;
try
.... tu codigo aqui para cargar y leer...
finally //con esto aseguras que se libera la memoria
  sArchivo.Free
end;