Преглед на файлове

* Fix forgotten PChar->PAnsiChar

Michaël Van Canneyt преди 2 години
родител
ревизия
9a9a11ee5d
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      packages/fcl-db/src/sqlite/customsqliteds.pas

+ 1 - 1
packages/fcl-db/src/sqlite/customsqliteds.pas

@@ -329,7 +329,7 @@ begin
     Move(p^, Result^, BufLen);
 end;
 
-function StrBufNew(p: PChar; BufLen: Cardinal): PChar;
+function StrBufNew(p: PAnsiChar; BufLen: Cardinal): PAnsiChar;
 begin
   Result := nil;
   if (p = nil) or (p^ = #0) then