मैं कैसे जांचूं कि सरणी में एक स्ट्रिंग मौजूद है या नहीं?

Question

मैं इस कोड है:

var 
    ExtString: string; 
const 
    Extensions : array[0..4] of string = ('.rar', '.zip', '.doc', '.jpg', '.gif'); 

if ExtString in Extensions then 

अंतिम पंक्ति पर, मैं कोई त्रुटि मिलती है:

[DCC Error] E2015 Operator ('then') not applicable to this operand type

मुझे लगता है कि मैं ऐसा नहीं कर सकते, तो मैं कैसे ठीक से मेरी कार्य कर सकते हैं?

Answer 1

क्या आप स्ट्रिंग की किसी सरणी में एक स्ट्रिंग के लिए जाँच नहीं कर सकते हैं, in का उपयोग कर पाया है के रूप में।

आप if बयान के बजाय इस सुविधा का उपयोग कर सकते हैं।

function StrInArray(const Value : String;const ArrayOfString : Array of String) : Boolean; 
var 
Loop : String; 
begin 
    for Loop in ArrayOfString do 
    begin 
    if Value = Loop then 
    begin 
     Exit(true); 
    end; 
    end; 
    result := false; 
end; 

आप इस तरह यह कह सकते हैं।

if StrInArray(ExtString,Extensions) then

StrUtils.pas यह पहले से ही परिभाषित किया गया है।

function MatchStr(const AText: string; const AValues: array of string): Boolean; 

Answer 2

निरंतर सरणी से एक TStringList उदाहरण आरंभ करें और IndexOf() का उपयोग करें।