經過痛苦的調試會話後,我發現TIdHashSHA1.HashStream不尊重它的ASize參數。考慮以下代碼: var
Hasher: TIdHashSHA1;
MS: TMemoryStream;
begin
MS := TMemoryStream.Create;
Hasher := TIdHashSHA1.Create;
try
我試圖做到這一點,所以一旦輸入不同的文本形狀將改變顏色,但它說('A''Z')是'期望'的問題,但收到一個字符串文字''一個'' '。我不知道如何解決它。任何幫助表示感謝,謝謝! type
TCapitalLetter = ('A' .. 'Z'); //subrange of type char
TDigit = ('0' .. '9'); //subrage of type