怎样连接REDIS服务端
怎样连接REDIS服务端
REDIS服务器是TCP/IP SERVER,因此客户端要访问,必须先同服务器建立SOCKET连接,然后才可以发送各种REDIS COMMAND(指令)。
首先要引用单元文件
uses
Redis.Commons, // 接口和类型
Redis.Client, // REDIS客户类
Redis.NetLib.INDY, // TCP协议库
Redis.Values; // redis 命令的可空类型
var
lRedis: IRedisClient; // 变量声明
lValue: TRedisString;
try
lRedis := TRedisClient.Create; // 创建REDIS客户端对象
lRedis.Connect; // 连接REDIS服务器
lRedis.Auth('password'); // 如果REDIS服务器有设置密码,此处必须验证密码;如果REDIS服务器没有设置密码,则客户端不要验证密码
lRedis.&SET('firstname', 'Daniele');//开始执行REDIS命令
lValue := lRedis.GET('firstname');
if not lValue.IsNull then
WriteLn('KEY FOUND! key "firstname" => ', lValue.Value);
WriteLn('DEL firstname');
lRedis.DEL(['firstname']); // remove the key
lValue := lRedis.GET('firstname');
if lValue.IsNull then
WriteLn('Key "firstname" doesn''t exist (it''s correct!)')
else
WriteLn(lValue.Value); // never printed
except
on E: Exception do
WriteLn(E.ClassName, ': ', E.Message);
end;
readln; // just to keep the command prompt open
本文来自博客园,作者:{咏南中间件},转载请注明原文链接:https://www.cnblogs.com/hnxxcxg/p/10467290.html
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】博客园社区专享云产品让利特惠,阿里云新客6.5折上折
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步