From 97c4ba2cc003736160e000f2e49879d9d0621bc5 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Tue, 3 May 2011 05:26:17 +0000
Subject: [PATCH] Use semicolon separator for Excel if system decimal separator
 is comma. See http://www.heidisql.com/forum.php?t=8226

---
 source/exportgrid.pas | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/source/exportgrid.pas b/source/exportgrid.pas
index ce4028b0..cd3cdbda 100644
--- a/source/exportgrid.pas
+++ b/source/exportgrid.pas
@@ -167,8 +167,12 @@ begin
   // Display the actually used control characters, even if they cannot be changed
   case ExportFormat of
     efExcel: begin
+      // Tab for pasting, semicolon if comma is also the decimal separator, and comma for the rest
+      // see http://en.wikipedia.org/wiki/Comma-separated_values
       if radioOutputCopyToClipboard.Checked then
         editSeparator.Text := '\t'
+      else if FormatSettings.DecimalSeparator=',' then
+        editSeparator.Text := ';'
       else
         editSeparator.Text := ',';
       editEncloser.Text := '"';