Skip to content

Instantly share code, notes, and snippets.

Show Gist options
  • Save viniciussanchez/f5fd7ab19dea3bd4f3067de4aa22c5c6 to your computer and use it in GitHub Desktop.
Save viniciussanchez/f5fd7ab19dea3bd4f3067de4aa22c5c6 to your computer and use it in GitHub Desktop.
ShowMessage class operator Add
var
LVenda1, LVenda2: TVenda;
begin
LVenda1.Valor := 100;
LVenda2.Valor := 50;
ShowMessage(CurrToStr(LVenda1.Valor + LVenda2.Valor));
end;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment