From daaf81101d662f062b9448df7d61eb6196ab0c2c Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Thu, 10 Jun 2010 10:47:32 +0000
Subject: [PATCH] IDE: Explicitly set caret pos for new files

git-svn-id: trunk@26022 -
---
 ide/main.pp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/ide/main.pp b/ide/main.pp
index 8916aef4e8..beb6f17b93 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -7877,6 +7877,7 @@ begin
     MainIDEBar.itmFileCloseAll.Enabled:=True;
     NewSrcEdit.SyntaxHighlighterType:=NewUnitInfo.EditorInfo[0].SyntaxHighlighter;
     NewUnitInfo.GetClosedOrNewEditorInfo.EditorComponent := NewSrcEdit;
+    NewSrcEdit.EditorComponent.CaretXY := Point(1,1);
 
     // create component
     AncestorType:=NewFileDescriptor.ResourceClass;