Autor Beitrag
Soccerkati
Hält's aus hier
Beiträge: 13



BeitragVerfasst: Mi 22.02.06 14:12 
erledigt.problem selber gelöst


Zuletzt bearbeitet von Soccerkati am Mo 27.03.06 20:37, insgesamt 1-mal bearbeitet
Horst_H
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1654
Erhaltene Danke: 244

WIN10,PuppyLinux
FreePascal,Lazarus
BeitragVerfasst: Mi 22.02.06 14:28 
Hallo,

was willst Du denn berechnen?
Die spezifische Waermekapazitaet ist in der Tat spezifisch fuer jeden Stoff und gegebener Temperatur.
Suchst Du sowas wie hier unten berechnet, die Temperaturangleichung unterschiedlicher Stoffe mit unterschiedlichen Temperaturen?
Formel wie [url=http://de.wikipedia.org/wiki/Spezifische_Wärmekapazität]diese[/url]?

Gruss Horst
Philipp_Reitter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 430



BeitragVerfasst: Mi 22.02.06 15:56 
ich hoffe dass ich dich richtig verstanden habe aber das iat eh ganz einfach

in einen button schreibst du:

ausblenden Delphi-Quelltext
1:
label3.caption:=FloatToStr(StrToFloat(edit1.Text) * StrToFloat(edit2.Text))+'j';					


dann rechnet ers dir aus...
dass amn dann keine buchstaben reinschrieben kann schreibst du das hier bei den edits in OnKeyPress

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
if (NOT (Key in ['0'..'9'','#8])) then
                Key := #0
        else if ((Length(TEdit(Sender).Text) = 0AND (Key = ',')) then
                Key := #0
        else if ((Key = ','AND (StrPos(PChar(TEdit(Sender).Text), ',') <> nil)) then
                Key := #0;



mfg philipp
jasocul
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 6395
Erhaltene Danke: 149

Windows 7 + Windows 10
Sydney Prof + CE
BeitragVerfasst: Mi 22.02.06 16:17 
:welcome: in der EE.

@soccerkati:
Erstmal stellst du fest, welche Formeln du benötigst.
Dokumentationen, wie man ein Struktogramm erstellt, findest du massenweise im Internet.
Wenn du das erledigt hast, können wir dir bei den speziellen Problemen sicher weiter helfen.
Soccerkati Threadstarter
Hält's aus hier
Beiträge: 13



BeitragVerfasst: Mi 22.02.06 22:29 
ja es geht um die spezifische wärmekapazität für temperatur (anfangs und endtemperatur)
also Q = m*c*deltaT

hab schon ne grobe oberfläche geschaffen.aber wie ich nun anfang weiß ich nich genau.
ich muss eingeben Wärmemenge,masse,anfangstemp. und endtemp.
ausgegeben soll die wärmekapazität.
einheiten sollen mit einer combobox auswählbar sein (z.b. bei wärmemenge J und kJ)!
weiterhin dürfen wir nur mit delphi 6.0 arbeiten!

danke für eure hilfe
jasocul
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 6395
Erhaltene Danke: 149

Windows 7 + Windows 10
Sydney Prof + CE
BeitragVerfasst: Do 23.02.06 09:06 
Dann ist der Ansatz von Philipp richtig.
Du benötigst drei Eingabefelder (TEdit für m, c, deltaT).
Den Inhalt musst du in Zahlen umwandeln (StrToInt).
Die Ergebnisse diese Umwandlung miteinander multiplizieren (siehe Formel).
Das Ergebnis irgendwo ausgeben (z.B. TLabel).

Abhängig von der Einstellung "J" oder "kJ", musst du noch durch tausend (kilo) teilen.
Für eine gesicherte Eingabe (nur Zahlen), kannst du den zweiten Teil von Philipps Source nehmen. Geprüft habe ich den aber nicht.

Da es eine Hausaufgabe ist, bekommst du von mir keinen Source, nur den Weg.