Like this:
The_Style : Gtk_Style;
begin
Gtk_New(The_Style);
Set_Foreground(The_Style, State_Normal, Parse("red"));
Set_Style(The_Label, The_Style);
Unref(The_Style);
If you want to change the colour back to the original one
you can use Set_Rc_Style(The_Label);
Manuel