Hola Chichero.
Aunque se puede optimizar un poco:
Código Delphi
[-]
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
if Combobox8.ItemIndex = 0 then
Qcvsj:= 1.136 * Anvs * Bavs * (Tbsecnj-Tbsi)
else
Qcvsj:=0;
end;
No es posible que el mensaje de error "Declaration expected but identifier "hola" found!" se produzca en el código del mensaje #3.
El único lugar donde podría estar la cadena 'hola' para ser partícipe indirecto del código superior, sería como item de ComboBox8. Pero como estás evaluando la propiedad ItemIndex tampoco es relevante.
Resumiendo: El error está en otro lado.
Saludos.