Hi All
I´m new to pascal, and need some help ;-)
I need one action when i click a button (send a serial string to Com)
and a different string when i release the button.
I have no problem in sending the first string when I click the button, but I can figure out how to send the second string when I release the button.
Could anybody give me a hint (in simple text, or maybe a samble)

Regards and thanks

one button,2 labels

procedure TForm1.Button1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
LABEL1.Caption:='1-34-56-778-888999-1000';
end;

procedure TForm1.Button1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
LABEL2.Caption:='BUTTON RELEASED.';
end;
{
when you press the button then the label1's caption is the serial,and when you release the button then label2's caption is the 
button released string
}