Does Delphi have anything built-in to generate UUIDs?
Also, if you need a GUID for an interface declaration, hit ctrl+shift+g in the code editor to insert a GUID at the caret.