Código Delphi [-] procedure TAboutBox.ContactClick(Sender: TObject); begin ShellExecute(GetDesktopWindow(),nil, pChar('mailto:caral@sudominio.org.cr'), nil,nil,SW_SHOWNORMAL); end;
procedure TAboutBox.ContactClick(Sender: TObject); begin ShellExecute(GetDesktopWindow(),nil, pChar('mailto:caral@sudominio.org.cr'), nil,nil,SW_SHOWNORMAL); end;