delphi atalho criar procedure code example Example: criar procedure/function delphi atalho Ctrl+Shift+C