Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
Autor |
Nachricht |
Toxman
Anmeldungsdatum: 15.02.2005 Beiträge: 42 Wohnort: Freiburg i. Brsg.
|
Verfasst am: 09. Apr 2005 19:31 Titel: |
|
|
Ja, du kannst dir ein eigenes Symbol machen.
Unter Tools gibt seinen Bildeditor und unter Projekt-> Projektoptionen/Anwendung kannst du es dann aussuchen.
- Bitte aber von jetzt an pro Frage einen Trhead |
|
Nach oben |
|
|
|
Zied
Anmeldungsdatum: 09.04.2005 Beiträge: 22
|
Verfasst am: 10. Apr 2005 14:30 Titel: ok |
|
|
K, und danke für eure schnellen antworten, echt geilö^^ |
|
Nach oben |
|
|
Zied
Anmeldungsdatum: 09.04.2005 Beiträge: 22
|
Verfasst am: 10. Apr 2005 14:40 Titel: oh |
|
|
meinst du mit tools zubehör und mit dem bildeditor Paint?
mein compiler hat sowas nämlich nicht ???? |
|
Nach oben |
|
|
Toxman
Anmeldungsdatum: 15.02.2005 Beiträge: 42 Wohnort: Freiburg i. Brsg.
|
Verfasst am: 10. Apr 2005 16:26 Titel: |
|
|
Nö, dass müsste in der IDE sein. Ich kann nur für D6 reden, dass hab ich von der Schule. |
|
Nach oben |
|
|
Zied
Anmeldungsdatum: 09.04.2005 Beiträge: 22
|
Verfasst am: 10. Apr 2005 17:55 Titel: Hä? |
|
|
Sorry ide? d6? ich bin 14... ist d6 nicht n Begriff aus der Bundeswehr? |
|
Nach oben |
|
|
Toxman
Anmeldungsdatum: 15.02.2005 Beiträge: 42 Wohnort: Freiburg i. Brsg.
|
Verfasst am: 10. Apr 2005 19:18 Titel: |
|
|
Meinst du vielleicht T5? Das ist ein Ausdruck bei der Bundeswehr und bedeutet so viel wie absolut wie absolut untauglich. [und ich hab diese Auszeichnung bekommen]
D6 steht einfach nur für Delph 6.
SChau einfach mal oben im Balken über den Komponenten. |
|
Nach oben |
|
|
Pr0g
Anmeldungsdatum: 15.02.2005 Beiträge: 90 Wohnort: Düsseldorf
|
Verfasst am: 10. Apr 2005 19:33 Titel: |
|
|
Vielleichts passts zum Thema, hatte in einem anderen Forum mal ein einfaches Beispiel für einen kleinen Parser geschrieben (ist aber ohne Punkt-Vor-Strich und so Sachen, Klammern könnte man auch noch einbauen, dann wohl am leichtesten per Rekursion):
Code: | program TermCalc;
uses crt;
function CalcTerm(T: String): Integer;
type
OpsSet = set of Char;
var
i,
tmp,
Sum,
NCount,
OCount: Integer;
Nr: String;
Numbers: Array [0..100] of Integer;
Operators: Array [0..100] of Char;
Ops: OpsSet;
begin
Sum := 0;
NCount := -1;
OCount := -1;
Nr := '';
Ops := ['+', '-', '*', '/'];
for i := 1 to Length(T) do
begin
if T[i] in Ops then
begin
Inc(OCount);
Operators[OCount] := T[i];
if Nr <> '' then
begin
Inc(NCount);
val(Nr, Numbers[NCount], tmp);
Nr := '';
end;
end else
Nr := Nr + T[i];
end;
if Nr <> '' then
begin
Inc(NCount);
val(Nr, Numbers[NCount], tmp);
end;
Sum := Numbers[0];
for i := 0 to OCount do
begin
tmp := Numbers[i + 1];
case Operators[i] of
'+': Sum := Sum + tmp;
'-': Sum := Sum - tmp;
'*': Sum := Sum * tmp;
'/': Sum := Sum div tmp;
end;
end;
CalcTerm := Sum;
end;
var
term: String;
summe: Integer;
begin
ClrScr;
term := '1+2*4/3';
summe := CalcTerm(term);
WriteLn(summe);
ReadLn;
end. |
_________________ http://webcraft.org/button_ani.gif http://ohs.pr0g.net/button_ani.gif |
|
Nach oben |
|
|
Zied
Anmeldungsdatum: 09.04.2005 Beiträge: 22
|
Verfasst am: 11. Apr 2005 15:40 Titel: mann |
|
|
du hast es drauf! |
|
Nach oben |
|
|
|