-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
10. Okt 2008
Hallo Ralph,
zu deiner Frage. Ich schrieb am Anfang, dass ich ein Newbie bin. Und zwar absolut. Da ich mit dem Rechner einigermaßen umgehen und ihn auch mal reparieren kann (selbst angeeignet) hab ich beschlossen, berufsbegleitend Informatik zu studieren. Im 2.Semester war Delphi das Thema (1.Semester LOGO). Vorlesung und Seminar im Wechsel. Hauptinhalt: Algorithmierung. Umsetzung in Quelltext...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
9. Okt 2008
Guten Morgen Ralph,
die Neugier hat mich nicht losgelassen. Du hattest recht, mit ein paar kleinen Änderungen läuft deine Prozedur prima durch. Habe noch ein kleines Problem, für das ich nach 3 Stunden probieren noch keine Lösung habe:
Beim Refill wird der dem gelöschten Datensatz nachfolgende Datensatz doppelt im StringGrid ausgegeben. In der Rebuild-Datei (und auch in 'Hilf') ist alles i.O....
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
6. Okt 2008
@ taaktaak
Großes Dankeschön für deine Mühe. Kann das Ganze aber leider erst am WE testen (büffel z. Zt. für `ne Klausur).
Melde mich, sobald ich ein Ergebnis habe.
Schönen Abend noch!
Michael
PS: Deine Formatierung erscheint mir logischer, aber da der Empfänger des Proggis die Formatierung so möchte, mach ich es halt so.
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
5. Okt 2008
@taaktaak
Sorry, hat ein bisschen länger gedauert.
Dein Hinweis zur Globalisierung hat insofern geholfen, dass ich einen anderen Fehler beseitigen konnte.
Da du den Quelltext für Fehlerfrei erachtet hast, bin ich nochmal alles durchgegangen und siehe da, der Fehler lag woanders.
Beim Löschen schließe ich die Datei. Der nachfolgende Aufruf im Programm erwartet aber eine geöffnete Datei.
...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
1. Okt 2008
Die Hilf-Datei liegt im selben Pfad wie die eigentliche Datei. Ich poste hier nochmal die komplette Prozedur. Vermutlich hab ich einen Syntaxfehler gemacht, den der Debugger nicht zeigt.
procedure TForm1.DatenLoeschenClick(Sender: TObject);
var i:SmallInt;
begin
seek(ChemDat,0);
Assignfile(ChemDatH,'Hilf');
rewrite(ChemDatH);
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
1. Okt 2008
Bin wie gesagt ein absoluter Newbie (bis vor `nem halben Jahr lag Delphi in Griechenland) und auch nicht mehr der Jüngste. Mache das Ganze Nebenbei. Deshalb bleibts nicht aus, dass ich mich dusselig anstelle. Bin auf folg. Probleme gestoßen:
-habe Dateiname folgendermaßen deklariertDateiname:=Opendialog1.FileName;
If Dateiname<>'' then
begin
...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
1. Okt 2008
Probiers gleich mal aus.
Wäre prima, wenn du mir die Syntax für RenameFile verraten könntest.
Sag schon mal Danke :)
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
1. Okt 2008
Muss nachfragen: Du meinst folgendes:
-ChemDat (hat alte Daten) CloseFile und dann DeleteFile
anschließend
-ChemDatH (hat neue Daten) Closefile und dann Rename und dann Assignfile (brauch sie ja wieder geöffnet)?
//bin kein Krümelkacker :lol:
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
1. Okt 2008
Hat etwas länger gedauert.
Zunächst mal danke für die Tipps. Als ich am Basteln war stellte ich fest:
Fehler in der Denke!
Ich mache Folgendes:
-Edits auslesen
-Datensätze in Datei schreiben
-anschließend wieder auslesen und im StringGrid ausgeben
Ergo: Durch Löschen im StringGrid ändert sich ja nichts am Dateiinhalt. Da ich nicht alles ummodeln wollte bin ich auf folg. Prozedur gekommen:...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
28. Sep 2008
Danke für den Tipp.
Melde mich Dienstag abend mit dem Ergebnis.
Schönen Sonntag noch.
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
28. Sep 2008
korrekt.
Zur Info: Soll als Beleg zum Thema Dateiarbeit ein Proggi schreiben.
Da ich Chemielehrer bin, versuch ich eine Chemikalienverwaltung (Zu- und Abgänge; Bestand). Da es ja mal passieren kann, dass eine Chemikale nicht mehr verwendet wird oder Fehleingaben passieren, soll dieser Datensatz gelöscht werden können.
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
28. Sep 2008
Habs nochmal gecheckt. Egal, welche Zelle ich anklicke, der entsprechende Datensatz wird in den Edits gezeigt.
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
28. Sep 2008
Ein Datenvergleich ist m.E. nicht nötig. Habe die Daten im Edit. Demzufolge müsste der Zeiger doch auf diesen bzw. den nächsten Datensatz zeigen.
Ergo: Filepos irgendwie auswerten und anschließend RowCount um 1 zuurücksetzen und dann das Grid neu einlesen.
Soweit meine Idee.
Aber mit der Umsetzung haperts.
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
28. Sep 2008
Oh Mann was bin ich doof.
Zeile entfernt und schon klappt es.
Besten Dank
BTW
Möchte den in den Edit-Feldern angezeigten Datensatz im StringGrid löschen. Wie stelle ich das an?
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
28. Sep 2008
Nach reichlich Bastelei bin jetzt soweit, das was ausgegeben wird.
Aber: wg. zeileARow:=Filepos(ChemDat)+1; wird immer der erste Datensatz ausgegeben.
Wie krieg ich den aktuellen (angeklickten) Datensatz?
Hier der Code
procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol, ARow: Integer;
var CanSelect: Boolean);
begin
If CanSelect=True then
seek(ChemDat,0);
with...
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
27. Sep 2008
Danke für den Tipp,
komme heute leider nicht mehr dazu, es auszuprobieren. Melde mich morgen wieder mit dem Ergebnis.
Schönes WE
-
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by klausmaus,
27. Sep 2008
Hallo Leute,
bin ein Newbie und habe folg. Problem:
Über Editfelder werden Daten in ein StringGrid eingelesen, gespeichert und sortiert. Habe auch `ne Suche, die gewünschte Datensätze in den Editfeldern ausgibt.
Möchte nun zusätzlich, dass beim anklicken einer Zeile die Editfelder mit den entsprechenden Daten gefüllt werden. Wie krieg ich das hin? (Options.goRowSelect ist true)