TimeStamp hh:mm:ss mit Zeit ersetzen

[Roki_]

Hallo,

ich möchte meinen TimeStamp mit jeweils der Zeit ersetzten, dazu habe ich eine function geschrieben wo ich aber den fehler
"[Error] Unit1.pas(420): E2010 Incompatible types: 'Char' and 'string'" erhalte. (hier Zeile 23)

Delphi-Quellcode:

function timestamp(): String;
var
ini: TIniFile;
timestamp: string;
begin

ini := TIniFile.Create(GetCurrentDir() + '\config.ini');
 try
  timestamp := ini.ReadString('log', 'timestamp', '');
  if timestamp <> '' then
   begin
    timestamp := ini.ReadString('log', 'timestamp', '');
   end
  else
   begin
    timestamp := '[hh:mm:ss]';
  end;
 finally
  ini.Free;
 end;

timestamp[pos('hh',timestamp)] := copy(TimeToStr(now),1,2);   // replace hour
timestamp[pos('mm',timestamp)] := copy(TimeToStr(now),4,2);   // replace minutes
timestamp[pos('ss',timestamp)] := copy(TimeToStr(now),7,8);   // replace seconds

result := timestamp;
end;

Lösung?

mfg
Roki