diff --git a/contrib/hbtip/httpcli.prg b/contrib/hbtip/httpcli.prg
index a72f3c4bd7..9d18fc242a 100644
--- a/contrib/hbtip/httpcli.prg
+++ b/contrib/hbtip/httpcli.prg
@@ -70,6 +70,7 @@ CREATE CLASS TIPClientHTTP FROM TIPClient
    METHOD Get( cQuery )
    METHOD Post( xPostData, cQuery )
    METHOD Put( xPostData, cQuery )
+   METHOD Delete( xPostData, cQuery )
    METHOD ReadHeaders( lClear )
    METHOD Read( nLen )
    METHOD UseBasicAuth()      INLINE   ::cAuthMode := "Basic"
@@ -123,6 +124,10 @@ METHOD Put( xPostData, cQuery ) CLASS TIPClientHTTP
 
    RETURN ::postByVerb( xPostData, cQuery, "PUT" )
 
+METHOD Delete( xPostData, cQuery ) CLASS TIPClientHTTP
+
+   RETURN ::postByVerb( xPostData, cQuery, "DELETE" )
+
 METHOD PostByVerb( xPostData, cQuery, cVerb ) CLASS TIPClientHTTP
 
    LOCAL cData, nI, cTmp, y