Insert in MSSQL 2008 mit PrimaryKey und automatischem Hochzählen funktioniert nicht

[Piro]

Moin zusammen,

ich hoffe einer von euch kein das Problem.

Ich habe ein Tabelle mit einem PrimaryKey "ID", der hochgezählt wird.
Hier mein Script zur Erstellung der Tabelle.

Code:

USE [KECCIDB]
GO

/****** Object:  Table [dbo].[requests]    Script Date: 05/30/2013 09:08:02 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

SET ANSI_PADDING ON
GO

CREATE TABLE [dbo].[requests](
   [id] [int] IDENTITY(1,1) NOT NULL,
   [title] [varchar](200) NOT NULL,
   [description] [varchar](500) NOT NULL,
   [project_extern] [bit] NOT NULL,
   [project_aqa] [bit] NOT NULL,
   [project_6sigma] [bit] NOT NULL,
   [requester] [varchar](100) NOT NULL,
   [record_created] [datetime] NULL,
   [customer_requested_start_date] [date] NULL,
   [customer_requested_end_date] [date] NULL,
   [project_start_date] [date] NULL,
   [project_end_date] [date] NULL,
   [duration] [float] NOT NULL,
   [completed_cancelled] [datetime] NULL,
   [lastupdate] [datetime] NULL,
   [lasteditor] [varchar](50) NOT NULL,
   [costs_expected_exchange_rate_dollar] [float] NOT NULL,
   [project_minutes] [ntext] NOT NULL,
 CONSTRAINT [PK_requests] PRIMARY KEY CLUSTERED 
(
   [id] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]

GO

SET ANSI_PADDING OFF
GO

Mit folgendem Code führe ich einen Insert durch und verwende dabei die TADODataSet Komponente. Unter MSSQL 2005 war das nie ein Problem und klappte immer.

Delphi-Quellcode:

 DSData.FieldByName('title').AsString                              := edt_title.Text;
 DSData.FieldByName('description').AsString                        := edt_description.Text;
 DSData.FieldByName('project_extern').AsBoolean                    := cb_project_extern.Checked;
 DSData.FieldByName('project_aqa').AsBoolean                       := cb_project_aqa.Checked;
 DSData.FieldByName('project_6sigma').AsBoolean                    := cb_project_6sigma.Checked;
 DSData.FieldByName('requester').AsString                          := cb_requester.Text;
 DSData.FieldByName('record_created').AsDateTime                   := recordCreated;
 DSData.FieldByName('customer_requested_start_date').AsVariant     := customer_requested_start_date;
 DSData.FieldByName('customer_requested_end_date').AsVariant       := customer_requested_end_date;
 DSData.FieldByName('project_start_date').AsVariant                := customer_project_start_date;
 DSData.FieldByName('project_end_date').AsVariant                  := customer_project_end_date;
 DSData.FieldByName('duration').AsFloat                            := ConvertToNummeric(edt_duration.Text);
 DSData.FieldByName('completed_cancelled').AsVariant               := Now; //completed_cancelled;
 DSData.FieldByName('lastupdate').AsDateTime                       := Now;
 DSData.FieldByName('lasteditor').AsString                         := lastEditor;
 DSData.FieldByName('costs_expected_exchange_rate_dollar').AsFloat := ConvertToNummeric(edt_expected_exchange_rate_dollar.Text);
 DSData.FieldByName('project_minutes').AsString                    := notepad.Text;
 DSData.Post;
 DSData.Close;

Sobald er den Post ausführt, kommt die Fehlermeldung im Anhang. Es kann nur die Spalte ID sein. Wenn ich sie im Insert mit angebe und z.B. Null zuweise geht es auch nicht. In eine Java Projekt machen wir das mit der Null und da funktioniert es.
Ab MSSQL 2008 hat sich da was geändert für den PrimaryKey mit AutoID.

Bloß wo muss ich jetzt was setzten, dass der Insert (neue Datensatz) funktioniert.

Danke im Voraus.
Sven