Projektarbeit mit Delphi 7 Personal

[Aurelius]

Hallo. Ich hab mal eine ganz bescheidene Frage: Und zwar bin ich mit 2 anderen Leuten gerade dabei eine Projektarbeit mit Hilfe von Delphi anzufertigen. Nur leider treten hier und da vereinzelt ein paar kleinere Schwierigkeiten auf.

Die Projektarbeit umfasst ein Programm, mit dem es Lehrern einfacher gemacht wird, einen Überblick über die gesammte Oberstufe (mit Noten der einzelnen Schülker, sowie weitere Details der Schüler). Das wird ales in eine Tabelle eingegeben. Desweiteren wird es möglich sein, den Durchschnitt des Schülers festzustellen (ausrechnen) und eine Progrnose für sein Abitur zu erstellen, insofern wir das alles hinbekommen.

Das erste Probelm, was uns Heute erst begegnete: Wir wollten eine Checkbox verarbeiten. Ihr kennt doch alle sicherlich die Option, dass man die Tabellen (StringGrid) bearbeiten kann, wenn man im Eigenschaftenfenster "goEdit" auf True schaltet. Die Checkbx allerdings soll erst bei Aktivierung die Bearbeitung der Tabelle möglich machen.

Also: Erst, wenn die Checkboxaktiviert wurden ist, soll es möglich sein, die Tabelle zu bearbeiten. Vorher nicht! Und da tut sich ein Problem auf, da uns keinerlei Befehle bekannt sind, die sich mit diesem Problem befassen. Ein "goEditing" gibt es im Quellcode nicht. Also bräuchten wir einen Befehlt für die Checkbox, dass sie nach Aktivierung die Bearbeitung an der Tabelle ermöglicht.

Ein weiteres Problem stellt die Zeitangabe und die Datumsanzeige dar. Wie schafft man es, dass Datum und Uhrzeit immer wieder aktualliesiert werden? Bisher blieb die bei allen Test immer gleich...

Also brauchen wir mal bitte bitte eure Hilfe!

Vielen Dank im Vorraus
08

[Nils_13]

Hi,

Zu 1:
du könntest eine Booleanvariable einbauen.
Edit : Deklarier unter private (bei TForm1..private) die Variable Flag, statt so, wie unten zu sehen ist. Dann darf das Flag := True/False allerdings nicht fehlen.

Delphi-Quellcode:

procedure TfrmMain.cbClick(Sender: TObject); // muss deinem CheckBox-Namen entsprechen
var Flag : Boolean;
begin
  if cb.Checked then // cb ist die CheckBox
    Flag := False;
  else
    Flag := True;

Jetzt musst du schauen, wo überprüft werden soll, ob schreiben erlaubt ist oder nicht und evtl. Flag verwenden, aber das hängt von deinen näheren Bedürfnissen ab.
end;

Zu 2: Schau dir mal den Timer von der Systempalette an. Dort gitb interval den Aktualisierungsabstand an und Enabled stellt ein, ob der Timer aktiv sei.

[Klaus01]

Guten Abend,


zum ersten Problem:

Delphi-Quellcode:

if checkbox1.checked then
  StringGrid1.options:=[goediting];

zum zweiten Problem:

Da könntet ihr einen Timer einsetzen mit einem Interval von 1 Sekunde
und damit die Anzeige aktualisieren.

Grüße
Klaus

[Aurelius]

Jop, Vielen Dank für die Antworten!!!

So wie ich mich kenne, werden weitere Fragen folgen...oO

P.S.: Cooles Forum. Gefällt mir!
Grüße
08

[Aurelius]

So, ich habe eine weitere Frage an euch und hoffe auf euch!

Also, das mit dem:
if checkbox1.checked then schueler.options:=[goediting]; funktioniert wunderbar, vielen Dank. Aber das "go editing" kann man nach erneutem Anklicken der Checkbox nicht wieder rückgängig machen. Also: man kann, wenn man ersteinmal die checkbox angeklickt hat, egal, ob sie dann an ist oder nicht, die Tabelle nicht wieder vor der Bearbeitung schützen...

D.H.: ich kann die "checkbox" nicht wieder rückgängig machen...Kann mir wer helfen? Danke schonmal

Grüße
08

[Die Muhkuh]

Hi,

versucht mal:

Delphi-Quellcode:

if checkbox1.checked then 
  schueler.options := schueler.options + [goediting]
else
  schueler.options := schueler.options - [goediting]

Man beachte das Plus und das Minus

[Aurelius]

Jo, super. Das funktioniert...

Und eine Frage habe ich noch: Wir haben in unserem Projekt auch mit vielen Tabellen zu tun. Kann man die mit Hilfe eines Befehls auch als .txt oder sogar als eine Exeltabelle speichern? Jetzt schon einmal danke für alle Antworten

Grüße
08

[Aurelius]

Nochmal die Frage:

Kann man StringGrids irgendwie speichern?

Ach ja:

[Aurelius]

So, ich hab mal wieder ein paar Fragen

1.) Ich möchte eine kleine Infobox erscheinen lassen wenn man auf einen Button ("Info") klickt. Dazu hab ich schon eine neue Form erstellt (info.dfm). Wie verlinke ich diese mit dem Button in Form1?

2.) Kann man den sichtbaren bereich der Programmoberfläche irgendwie als Bilddatei speichern? So in etwa wie einen Screenshot machen?

Danke für eure Hilfe.

08