Delphi语法求帮助

[小项想进大厂]

刚学Delphi，语法无法解决，求帮助

[super_caibi]

0是字符串 加上引号

[super_caibi]

0不加引号是integer型，和你前面的s[] ，类型不匹配

[gdljf]

if (s[4]='0') and …

[ddvddt1]

你的s定义好像有问题吧，看下面你使用的时候是数组，但是你定义的时候确实字符
你要想把s当成数组用的话，你得定义成数组
var s：array of double；

[xiezs]

0要加单引号

[rslxy]

楼主的条件判断有问题，你的原意应当是，根据当前时间字符串，如21:00:00，如果分、秒字符均为'0'，则条件成立，播放音乐。
但不同的系统设置，TimeToStr得到的字符串可能是不同的，因此有可能失败或出现内存访问异常。
你可以使用
DecodeTime(Now(), wHour, wMin, wSec, wMSec);
然后判断 wMin、wMin是否为0进行判断。