procedure TForm1.CompareCharToString(chstr: Char; str: string);
var
? aa: array[0..1]of AnsiChar;
? str1: string;
begin
? chstr := 'a';
? str := 'a';
? aa[0] := AnsiChar(chstr);
? str1 := StrPas(aa);
? if str = str1 then
? ? ShowMessage('相等！')
? else
? ? ShowMessage('不相等！');
end;

總結

以上是生活随笔為你收集整理的delphi char与string比较的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。