'Ich hab ein Brett vor dem Kopf' oder 'inc(var)'

[ManuMF]

Hmmm, ich würde da eher ein Boolean nehmen:

Delphi-Quellcode:

var VFett: Boolean = false;
// Global, sonst "merkt sich" Delphi den Wert nicht ;-)

procedure TForm1.SBbClick(Sender: TObject);
begin
VFett := not VFett;

If VFett Then
 begin
   MText.Text:= MText.Text + ' [b] ' ;
   SBb.Caption:= '[/b]' ;
 end
else
 begin
   MText.Text:= MText.Text + ' [/b] ' ;
   SBb.Caption:='[b]' ;
 end;
end;

end.

Gruß,
ManuMF