PureBasic Forums - English

Posted: **Sun Sep 04, 2005 3:07 pm**

Its damn annoying that you brittish people use a dot "."

Posted: **Sun Sep 04, 2005 3:50 pm**

I know and someone needs to tell the americans about that 'mm/dd/yyyy' thing for dates! it's just wrong!

Posted: **Sun Sep 04, 2005 3:51 pm**

Hey we invented English, and we owned 0.25 of the world at one point - so you can stick your commas!

Posted: **Sun Sep 04, 2005 3:52 pm**

hehe

Posted: **Sun Sep 04, 2005 4:42 pm**

Also stop throwing the "U" out of words like colour! Imagine that taken to an extreme:

This is or hose.
We use flor to bake or cakes.
News updates on the hor.

Por some water on it!
Of corse it's wrong!

Posted: **Sun Sep 04, 2005 5:16 pm**

lol haha

Posted: **Mon Sep 05, 2005 6:56 am**

I know and someone needs to tell the americans about that 'mm/dd/yyyy' thing for dates! it's just wrong! Wink

True... I don't know where they took the idea from .. (stole it from who?

) But I prefer dd/mm/yy all life.

Well.. Colour < Color ..
Color is used even in spanish! so it wins. end of story

Salute the chavs for me (those bloody townies!).
Castel for the Brit - Castle for the Yankee

Posted: **Mon Sep 05, 2005 8:23 am**

dagcrack wrote:Color is used even in spanish! so it wins. end of story

lol.

Who can (or wants to) argue with that.

Posted: **Mon Sep 05, 2005 1:10 pm**

heh no argumenting, i just always write colour

dd/mm/yy is the correct one. Those americans, jeez :roll:

Posted: **Mon Sep 05, 2005 3:13 pm**

@british people
stop driving in the wrong way.

oh and btw...

Code: Select all

Procedure IsNumeric(String.s)
  If Str(Val(String)) <> "0"
    Result = #True
  Else
    Result = #False
  EndIf
  ProcedureReturn Result
EndProcedure

Debug IsNumeric("99")
Debug IsNumeric("ABC")
Debug IsNumeric("AB99CD")

for the most people it should be good enough.

c ya,
nco2k

Posted: **Tue Sep 06, 2005 8:06 pm**

that last one wont catch 0's though.... maybe this?

Code: Select all

Procedure IsNumeric(String.s)
  If String = Str(Val(string))
    Result = #True
  Else
    Result = #False
  EndIf
  ProcedureReturn Result
EndProcedure

Debug IsNumeric("99")
Debug IsNumeric("ABC")
Debug IsNumeric("AB99CD")
Debug IsNumeric("0")

Posted: **Tue Sep 06, 2005 8:45 pm**

@aszid
yes you are right, my mistake sorry.

c ya,
nco2k

Posted: **Wed Sep 07, 2005 5:22 am**

*editted*

blarg.... forget i even posted, i read to the beginning and saw the same code practically >.<

Posted: **Wed Sep 07, 2005 6:25 am**

Hate it when that happens.

Posted: **Wed Nov 29, 2006 8:44 pm**

Just for fun...

Code: Select all

Procedure IsNumeric(String.s) 
  ProcedureReturn String = Str(Val(String)) 
EndProcedure

...but with a limitation for string starting by "0"

Code: Select all

Debug IsNumeric("0899")

PureBasic Forums - English

IsNumber