list index out of bounds(1) Que erro é este
Estou tentando utilizar esta função, mas ta retornando a excessão acima, alguem poderia ajudar
Function Saudacao :String;
begin
result:=´Boa-noite!´;
if (time>=0.25) and (time<0.5) then result:=´Bom-dia!´;
if (time>=0.5) and (time<0.80) then result:=´Boa-tarde!´;
end;
a chamada dela é:
StatusBar1.Panels[1].Text:= Saudacao + ´ Hoje é ´+ formatdatetime(´dddddd´,date);
Desde ja agradeço
Function Saudacao :String;
begin
result:=´Boa-noite!´;
if (time>=0.25) and (time<0.5) then result:=´Bom-dia!´;
if (time>=0.5) and (time<0.80) then result:=´Boa-tarde!´;
end;
a chamada dela é:
StatusBar1.Panels[1].Text:= Saudacao + ´ Hoje é ´+ formatdatetime(´dddddd´,date);
Desde ja agradeço
Dpinho
Curtidas 0
Respostas
Biffi
04/08/2004
Provavelmente o StatusBar1.Panels[1].Text:= não exista tente StatusBar1.Panels[0].Text:=
deve funcionar....
Esse erro ocorre comigo sempre que tento atribuir um valor para um vetor para um indice maior do que os existentes no vetor....
espero ter ajudado
deve funcionar....
Esse erro ocorre comigo sempre que tento atribuir um valor para um vetor para um indice maior do que os existentes no vetor....
espero ter ajudado
GOSTEI 0
Paulo_amorim
04/08/2004
Olá
List Index Out Of Bounds quer dizer que um array acessado não tem tantas posições quanto a que você colocou (no caso, 1).
Como a única coisa que parece com isso eh a StatusBar, deve estar ae o problema (como já disse o Biffi)
Até+
List Index Out Of Bounds quer dizer que um array acessado não tem tantas posições quanto a que você colocou (no caso, 1).
Como a única coisa que parece com isso eh a StatusBar, deve estar ae o problema (como já disse o Biffi)
Até+
GOSTEI 0