nose 0 Newbie Poster

I am trying to convert this to Delphi, but I'm lost, please help

enum Error
{
	Ok = 0,
	ErrorUnsupportedFunction,
	ErrorInvalidParamaters,
	ErrorInternal,
	ErrorUnknown = 0xffffffff
};
typedef enum Error Error;

Error __stdcall GetLastError()
{
	typedef Error(__stdcall *FunctionType)(); 
	FunctionType GetLastError = (FunctionType)GetProcAddress(GetModuleHandle(NULL), "GetLastError");
	return GetLastError();
}