Hey Phoenix!
Ich danke für deine Antwort.
Endlich hat sich mal einer erbarmt. Ob ich nun unbedingt den Borland DataProvider brauche. Nein, aber dies ist meine aller-, allererste WebAnwendung und dachte, da ich bis einschl. D7 ganz zufrieden mit den Borland-Komponenten war, daß es damit einfacher ist, weil die doch schon alles zwischenspeichern, was bei den zustandslosen
HTML-Seiten ganz nützlich ist.
Ein Problem, was ich hab, ist zum Beispiel Felder im Dataset programm-technisch versorgen (das Dataset ist glaub ich ASP.NET nichz speziell Borland), damit der Anwender nicht alles eingeben muß.
Ich benutze z.B. eine DatePicker-Komponente (von TMSSoftware) die für das Date-Property kein Databinding hat. Also versuche ich diesen Wert programm-technisch ins Dataset zu schieben:
Code:
procedure TfrmBenutzer.Controls2Ds;
var
iRow: Integer;
iRowCount: Integer;
myRow: DataRow;
begin
//Index der aktuellen Zeile ermitteln
iRow := (srcBenutzer as IDBDataSource).GetCurrentRow(page, cTabBenutzer);
iRowCount := dsBenutzer.Tables[cTabBenutzer].Rows.Count;
if (iRow > -1)
and (iRow < iRowCount) then
begin
myRow := dsBenutzer.Tables[cTabBenutzer].Rows[iRow];
//Nicht datengebundene Controls in Dataset zurückschreiben
try
if not myRow[cGueltigAb].Equals(dtpGueltigAb.Date) then
begin
myRow[cGueltigAb] := Convert.ToString(dtpGueltigAb.Date);
end;
myRow.AcceptChanges;
except
on ex:
Exception do
myMeld.Show('Controls2Ds: ' + ex.message);
end;
end;
end;
Nur funktionuckelt das nicht.
Programm fällt nicht auf die Schnauze, aber der Wert scheint auch nicht drin zu sein. Kann leider irgendwie beim Test nicht alle Object-Eigenschaften einsehen.