SRL Archive - Help and Support

Maybe this problem is really noobish, but I can't figure it out.
Is there a way to check if a var has a value? Like in PHP 'isset'?

Thx, Gala

Don't you do

if Length(var) > 0 then //if it has a value, it should be greater than 0

Is this not only for arrays?
Does it work for integers and strings, too?

From: Gala
Is this not only for arrays?
Does it work for integers and strings, too?

No it works I think.


EDIT: Well this compiles anyway:

procedure Test;
var
  day, pol: Integer;
begin
  day := Length(pol);
  if day > 0 then
    Writeln('Hi!');
end; 

EDIT2: No it doesn't :p

From: Gala
Is this not only for arrays?
Does it work for integers and strings, too?

Length works for strings, not integers, you'd have to do something like:

if(variable = 0)then...

writeln(string = nil);
[LEFT]
writeln(int = 0);

writeln(ord(char) = 0);

writeln(char(somechar) = #0);

[/LEFT]


etc..

What kind of craziness are you talking about?

PascalScript and Lape both set all variables to default values. If you need to check if you've given something a value already, you're doing something very wrong, but use a flag for it.

From: mixster
What kind of craziness are you talking about?

Hehe.

Thx at all, I had an error in reasoning :duh: