Hola jymy, te recomiendo que intentes usar las etiquetas [ Delphi ] y [ /Delphi ] (sin espacios) para encerrar el código, así aclaras tu duda a los demás.
Código Delphi
[-]ShowMsg(QGen.Fields[0].AsString)
Código Delphi
[-]FormMain.StatusBarMain.Panels.Items[1].Text := QGen.Fields[0].AsString
Aunque tampco es necesario para líneas tan cortitas. También te aconsejaría que dieses más información, como plataforma, versión de Delphi, etc.