[*Caro*]

Hola elierlora, no dices que error te marca, pero por lo que veo no estas creando Cone.

Código Delphi [-]
Procedure TForm1.Inicio;
Begin
{Aqui es donde Me dá el Error}
Cone:= TAdoConnection.Create(Self);
Cone.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.3.51;Persist ' 
+ 'Security Info=False;Data Source=D:\PTiempo\ParteT.mdb';
Cone.Connected := True;
End;

Saluditos