using or with strings

Posted on 2011-05-03
Last Modified: 2012-06-27
I am trying to use a line like
"if string = '.bmp' or '.jpg' then
but I get
[DCC Warning] MAIN.PAS(376): W1058 Implicit string cast with potential data loss from 'string' to 'ShortString'

It also doesn't seem to work if I type
"if string = 'bmp' or if string = '.jpg' "then

how can I write this ?
Question by:ChLa
    LVL 32

    Accepted Solution


    do it like this

    if (string = '.bmp') or (string = '.jpg') then
    LVL 32

    Expert Comment


    if you want it cleaner, you can use AnsiIndexText

    if AnsiIndexText(lowercase(yourstring), ['.bmp', '.jpg']) >= 0 then
         //your stuff

    Open in new window


    Author Comment

    That worked...Thank You

    Write Comment

    Please enter a first name

    Please enter a last name

    We will never share this with anyone.

    Featured Post

    What Should I Do With This Threat Intelligence?

    Are you wondering if you actually need threat intelligence? The answer is yes. We explain the basics for creating useful threat intelligence.

    The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
    Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
    Get a first impression of how PRTG looks and learn how it works.   This video is a short introduction to PRTG, as an initial overview or as a quick start for new PRTG users.
    In this tutorial you'll learn about bandwidth monitoring with flows and packet sniffing with our network monitoring solution PRTG Network Monitor ( If you're interested in additional methods for monitoring bandwidt…

    779 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    14 Experts available now in Live!

    Get 1:1 Help Now