Skip to content

Instantly share code, notes, and snippets.

@an01f01

an01f01/todo_terrortodo.pas

Created June 23, 2023 18:57
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save an01f01/9f5168949cf7ca6ae5f5f8a15b56fe41 to your computer and use it in GitHub Desktop.
Save an01f01/9f5168949cf7ca6ae5f5f8a15b56fe41 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
todo_terrortodo.pas
{ TErrorTodo }
constructor TErrorTodo.Create(ErrorMessage: string);
begin
self.ErrorMessage := ErrorMessage;
end;
function TErrorTodo.GetSelf: TObject;
begin
Result := Self;
end;
function TErrorTodo.ToString: string;
begin
Result := 'Todo Error: ' + ErrorMessage;
end;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment