[Resolvido] procedure delphi

Boa tarde!!

Pessoal preciso da ajuda de vcs, estou tentando fazer uma procedure que tem q passar por parametro 2 tipos de variaveis, mas esta dando erro, nao estou conseguindo....

Segue como estou fazendo

procedure Pega_Dados_Grafico_media_percurso(DataInicial,DataFinal:TDataTime ;Perc:String) ;

procedure TDMGRAFICO2.Pega_Dados_Grafico_media_percurso(DataInicial,

DataFinal: TDataTime; Perc: String);

VAR

litros : real;

begin

 SQLDATASETGRAFMEDIA2.Close;

 SQLDATASETGRAFMEDIA2.Params.ParamByName('pDataInicio').Value := DataInicial;

 SQLDATASETGRAFMEDIA2.Params.ParamByName('pDataFim').Value := DataFinal;

 SQLDATASETGRAFMEDIA2.Params.ParamByName('pPerc').AsString := Perc;

esta dando um erro assim :[Error] UDMGRAFICO2.pas(73): Undeclared identifier: 'TDataTime'

Fico no aguardo.Obrigada