Delphi FormatDateTime异常

对于CSV文件的每一行，我的应用程序都需要调用一个方法，该方法读取每个变量，并使用GetDataItem方法将其中一些变量写入表中。e、 g

Var
Item: String;
Tmp: String;
Rdate: String;
TmpDateTime: TDateTime;

begin
Table1.Append'
Tmp := GetDataItem(Data, Item); {Ignore}
Tmp := GetDataItem(Data, Item); {Ignore}
Tmp := GetDataItem(Data, Item); {Members ID}
Table1.FieldByName('Member ID').AsString := UpperCase(Tmp);
TmpDateTime := StrToDateTime(etDataItem(Data, Item));
Table1.FieldByName('Arrival Date').AsString := FormatDateTime('dd/mm/yyyy',TmpDateTime);
Table1.FieldByName('Arrival Time').AsString := FormatDateTime('hh:mm:ss',TmpDateTime);
...
Table1.Post;

除了我还需要以yyyymmdd格式从日期时间戳生成ReverseDate之外，这一切都很好。然而，再次尝试使用timestamp变量似乎会引发异常，例如

RDate := FormatDateTime('yyyy',TmpDateTime) + FormatDateTime('mm',TmpDateTime) + FormatDateTime('dd',TmpDateTime);

或

我尝试过复制DateTime变量并处理它，或者拆分一个DateTime字符串，但这就像任何进一步的操作在运行时抛出异常一样

编辑：抱歉，在我的XP机器上，我现在遇到异常：

EAccessViolation in the module 'ImpWintacs.exe' at 000749DA. Access violation at address "000749DA" in module 'ImpWintacs.exe'. Read of address 00C1FDF8.

---

感谢我用来从CSV读取下一个变量的方法，读取字符直到下一个逗号。CSV中的最后一个变量后面没有逗号。因为我不需要最后一个变量，所以我选择不读取它。

引发的异常是什么？当运行完全没有意义且没有异常类型和错误消息时引发异常。这就像说我的电脑坏了一样。我怎样才能修好它哎呀，如果是USB电缆，修复起来要比硬盘驱动器故障或电容器熔断容易得多。当出现错误或异常时，请给出准确的错误代码和错误消息，包括任何内存地址。如果您需要帮助，您越容易提供帮助，您就越快能够帮助解决问题。很抱歉，我是Delphi的新手，在这种情况下，我不知道如何打印例外。它现在可以在我编译的Win2000 PC上正常工作，但在我的另一台XP PC上却不行，它具有相同的CSV和数据库文件。我已将最新的异常作为编辑包括在内，但这里是：模块'ImpWintacs.exe'中的EAccessViolation（000749DA）。模块“ImpWintacs.exe”中地址000749DA处的访问冲突。读取地址00C1FDF8。

EAccessViolation in the module 'ImpWintacs.exe' at 000749DA. Access violation at address "000749DA" in module 'ImpWintacs.exe'. Read of address 00C1FDF8.