Abschlußprogramm Info KLasse 11!!!

[lurch]

Ich möchte hier mal mein Abschlußprogramm aus Info vorstellen: Schaut es euch einfach mal an und posted mir wie ihr es findet. 2 Probleme hab ich z.Z. noch wobei ich nicht weiß wie ich sie beheben soll... vielleicht fällt euch ja was ein.
1. Wenn man beabsichtigt Fehler bei der Eingabe eingibt und diese Prüfen lässt werden 2 Fehlermeldungen ausgegeben!
2. Im Fall "sws" wird einfach die Art des Dreiecks nicht ausgerechnet od. ausgegeben!

danke schoma... david

[Daniel]

Vorab eine Frage: Hast Du es bereits abgegeben oder wirst Du es noch abgeben?

[lurch]

Ich muss es noch abgeben, da es aber komplexer ist als diese meiner Mitschüler, muss ich morgen mochmal zu meinen Infolehrer damit er mir nochmal nen paar Fehler ausmerzt...

[BluesKid]

Moin moin

zu 1.: In einen Memo nur Zahlen zulassen

Dann kannst du dir schonmal die wilden try...except Blöcke sparen :-)

schönen Gruß

sam

[nailor]

oder einfach ein SpinEdit nehmen!

[Luckie]

Zitat:

Zitat von lurch

Ich muss es noch abgeben, da es aber komplexer ist als diese meiner Mitschüler, muss ich morgen mochmal zu meinen Infolehrer damit er mir nochmal nen paar Fehler ausmerzt...

Wenn das schon komplex ist... :shock: Letztendlich hast du ja nur a + b programmiert. Keine großartigen Kontrollstrukturen (Schleifen etc.) nichts.

[lurch]

Es ist auch mein erstes Jahr Info gewesen und wir haben nen total komischen Info-Lehrer der bloß vorraussetzt das unser Infoprogramm 70 Zeilenlang ist (Ohne deklaration...)

[Pr0g]

Zitat:

Zitat von BluesKid

zu 1.: In einen Memo nur Zahlen zulassen

Eine wohl bessere Lösung, als if not key in... wäre folgende:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  SetWindowLong(
    Memo1.Handle,
    GWL_STYLE,
    GetWindowLong(
      Memo1.Handle,
      GWL_STYLE
    ) or ES_NUMBER
  );
end;

MfG Pr0g

[Luckie]

Hast du das getestet? So bviel ich weiß, geht das bei Memos nicht.

[Pr0g]

Zitat:

Zitat von Luckie

Hast du das getestet? So bviel ich weiß, geht das bei Memos nicht.

Doch, es geht.

[lurch]

Nochma für alle die es interessiert:
Hier ist jetzt das Programm in dem Zustand wie ich es abgeben werde!!!
Die 2 Fehler wurden behoben...

lurch

[Ultimator]

Schon nicht schlecht, aber du gehst sehr großzügig mit dem Platz um :pale:

[Maa83]

Das Programm ansich ist nicht schlecht ABER:

Bei dem Code bekommt man ja einen Heulkrampf :cry:

bitte benenne die ganzen Objekte um... so kann man doch keine Arbeit abgeben...

und wenn du den Code jemals wieder anfassen bzw. erweitern möchtes... dann hast du ein großes Problem... :shock:

[TopDogg]

hi,
wenn man schon mit der VCL proggt, dann bitter etwas schoener.
ich mein nicht den Source, sondern "nur" das aussehen. als anfaenger kann man wenigstens das desing
"schoener" machen (ueber geschmack kann man streiten), oder versuchen.
das progg is ja net schlecht, aber sehr haesslich. :kotz:
nach 30 min zeittotschlaegerei(:wiejetzt:) kamm das heraus.
ich habe nichts an dem quelltext geaendert, nicht mal angeschaut.

[Maa83]

TXPManifest nicht gefunden!

wie macht man das mit diesen Design?

[Hansa]

DIe Initialisierung der Variablen usw. ist fehlerhaft.

[Pr0g]

Zitat:

Zitat von Maa83

TXPManifest nicht gefunden!

wie macht man das mit diesen Design?

Alle Versionen unter 7 von Delphi müssen das XP Manifest noch manuell einfügen. Dazu musst du nur eine bestimmte Resource kompilieren und raus kommt die angehangene Datei. Diese bindest du dann ein:

Delphi-Quellcode:

...
implementation

{$R *.dfm}
{$R winxp.RES} // <-- Einbinden
...

MfG Pr0g

[lurch]

Danke für die Anregungen::: @ TopDogg kannst du mir sagen wie man ganz einfach das Design veränert z.B.: neue Groups aber die alten Edit's und Labels??? danke

lurch

[Nicodius]

naja irgendwie machen wir im ersen jahr schon komplexere sachen(wir haben auch einen schlechteren lehrer) allerdings haben wir auch ein Genie von lehrer(@schiffermüller) ;)


.... mit verwaltungssoftware etc...



aber eigentlich :thuimb:


@Pr0g ... bei meinem programm ändert das nxi am design :? hab winXP und 8 Forms...

und war das nicht noch was mit ner rs dateI?

[TopDogg]

tach,
einfach ausprobieren.
wie man die farbe aendern kann, muss ich nicht erklaeren.
bei den edit dan mit den styles rumspielen.
der phantasie sind keine grencen gesezt.

@Nicodius:
hier die windowsxp.res die ich (bzw delphi) nuzt.

[Nicodius]

wann gibst du es denn ab?

[lurch]

Also ich hab es schon abgegeben... 14Punkte--> Rechtschreibfehler auf der Oberfläche (Winkle:Winkel) und die Winkel unter 0° vergessen auszuschließen...

[Alex_ITA01]

hallo erstmal,
ich weiß, es ist ein wenig spät :mrgreen: aber ich habe mir dein Prog mal angeguckt und die Fehler die du selber bemängelt hast behoben.Da waren auch einige Variablen (laut Delphi: "xxx könnte möglicherweise nicht ini... worden sein") undefiniert...
Ich habe allerdings keine Überprüfung der Berechnung durchgeführt (ich sage nur Programmierer und Mathe :gruebel: ) *g*
Deine Eingaben habe ich auch alle auf Gültigkeit und eventuelle "LeerStrings" überprüft...
Ich hoffe es hilft dir trotzdem noch ein wenig...
MFG Alex

[Ultimator]

@Pr0g:
Das mit der anderen Lösung als if not Key in... würde ihm der Lehrer nach einem Jahr Info eh nicht abkaufen, meinst du nicht auch? ;-)