{"id":987,"date":"2008-10-16T23:49:23","date_gmt":"2008-10-16T22:49:23","guid":{"rendered":"http:\/\/www.itwriting.com\/blog\/987-sqlite-and-delphi-2009.html"},"modified":"2008-10-16T23:49:23","modified_gmt":"2008-10-16T22:49:23","slug":"sqlite-and-delphi-2009","status":"publish","type":"post","link":"https:\/\/www.itwriting.com\/blog\/987-sqlite-and-delphi-2009.html","title":{"rendered":"SQLite and Delphi 2009"},"content":{"rendered":"

I created a simple Delphi wrapper<\/a> for SQLite<\/a>, the popular open source database library. I\u2019ve just updated it to work with Delphi 2009 \u2013 I\u2019m not happy with what I\u2019ve done, because I\u2019ve changed a bunch of declarations from PChar to PAnsiChar and from String to AnsiString, just to get it working quickly. SQLite is fine for Unicode, so the next step is to revise it properly to support Unicode … when I or someone else has time.<\/p>\n

It was interesting to do some work with Delphi 2009. It has the old problem: out of date documentation. Here\u2019s what it says about PChar, in the entry on pointer types:<\/p>\n

\n

The fundamental types PAnsiChar<\/strong> and PWideChar<\/strong> represent pointers to AnsiChar<\/strong> and WideChar<\/strong> values, respectively. The generic PChar<\/strong> represents a pointer to a Char<\/strong> (that is, in its current implementation, to an AnsiChar<\/strong>).<\/p>\n<\/blockquote>\n

Further, if you have the following code:<\/p>\n

\n

var
strTest: PChar;
begin
strTest := StrAlloc(6);
strcopy(strTest,’Hello’);
strdispose(strTest);
end;<\/p>\n<\/blockquote>\n

and hover the mouse over strTest in the editor, the pop-up tip says:<\/p>\n

\n

strTest \u2013 System.PAnsiChar<\/p>\n

<\/p>\n<\/blockquote>\n

However, this is wrong. In Delphi 2009, a generic PChar is a PWideChar. Here\u2019s the code in SysUtils for StrAlloc:<\/p>\n

\n

function StrAlloc(Size: Cardinal): PChar;
begin
{$IFDEF UNICODE}
  Result := WideStrAlloc(Size);
{$ELSE}
  Result := AnsiStrAlloc(Size);
{$ENDIF}
end;<\/p>\n<\/blockquote>\n

UNICODE is defined in Delphi 2009, so StrAlloc returns a PWideChar.<\/p>\n

Technorati tags: delphi<\/a>, sqlite<\/a>, unicode<\/a><\/div>\n","protected":false},"excerpt":{"rendered":"

I created a simple Delphi wrapper for SQLite, the popular open source database library. I\u2019ve just updated it to work with Delphi 2009 \u2013 I\u2019m not happy with what I\u2019ve done, because I\u2019ve changed a bunch of declarations from PChar to PAnsiChar and from String to AnsiString, just to get it working quickly. SQLite is … Continue reading SQLite and Delphi 2009<\/span> →<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[24,80],"tags":[],"class_list":["post-987","post","type-post","status-publish","format-standard","hentry","category-delphi","category-software-development"],"_links":{"self":[{"href":"https:\/\/www.itwriting.com\/blog\/wp-json\/wp\/v2\/posts\/987","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.itwriting.com\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.itwriting.com\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.itwriting.com\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.itwriting.com\/blog\/wp-json\/wp\/v2\/comments?post=987"}],"version-history":[{"count":0,"href":"https:\/\/www.itwriting.com\/blog\/wp-json\/wp\/v2\/posts\/987\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.itwriting.com\/blog\/wp-json\/wp\/v2\/media?parent=987"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.itwriting.com\/blog\/wp-json\/wp\/v2\/categories?post=987"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.itwriting.com\/blog\/wp-json\/wp\/v2\/tags?post=987"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}