 |
| |
|
|
 |
Autor |
Nachricht |
 |
| |
| Halbgard |
#1| Verfasst am: 02.07.2008, 17:56 Titel: Charaktereinlesung Für D&D - stat. Array |
 |
 |
 |
|
gerade reingestolpert Status: offline Beiträge: 2 angemeldet: 26.06.2008

|
Sprache: Delphi (Win32) Hallo Leute!
Ich hab mich erst vor ein paar Tagen angemeldet und kenn mcih noch nicht ganz aus, aber ich hoffe mal, dass das Thema in dieser Rubrik nciht falsch ist
okai, also ich bin gerade beim selbstbeibringen und lese halt einige Tutorials, und nun bin ch bei den Arrays angekommen.
Da dacht ich mir, ich könnt soetwas fürs Rollenspiel benutzen, also die Werte, das Lvl, das Gepäck und die Erfahrungspunkte eines NPCs in soein array hineinschreiben könnte, damit ich sie später benutzen kann.
Nun hab ich aber nicht wirklich foren oder tutorials gefunden, wo erklärt ist, wie man das macht, wie ich das haben will (logisch, ich weis...^^")
Delphi-Quellcode: | zusammenfalten | markieren | 1 · · · 5 · · · · 10 · · · · 15 · · · · 20 · · · · 25 · · · · 30 · · · · 35 · · · · 40 · · 43
| {$R *.nfm}
var Giveoutplace:TFileStream;
chararray1:array [0..11] of string;
procedure TForm1.Button1Click(Sender: TObject);
var abentname,vorname,nachname,gepaeck:String;
lvl,Staerke,Geschick,Konstitution,Weisheit,Intelligenz,Charisma,erfahrungspunkte:Integer;
begin
abentname:=(editabent.text);
vorname:=(vorn1.text);
{ nachname:=(nachn1.text);
lvl:=strToInt(editlvl1.text);
staerke:=strToInt(str1.text);
geschick:=strToInt(ges1.text);
konstitution:=strToInt(kon1.text);
weisheit:=strToInt(wei1.text);
intelligenz:=strToInt(int1.text);
charisma:=strToInt(cha1.text);
gepaeck:=(gep1.text);
erfahrungspunkte:=strToInt(ep1.text);} //müsste überflüssig sein...
chararray1[0]:=abentname;
chararray1[1]:=vorname;
chararray1[2]:=nachname;
chararray1[3]:=editlvl1.text;
chararray1[4]:=str1.text;
chararray1[5]:=(ges1.text);
chararray1[6]:=(kon1.text);
chararray1[7]:=(wei1.text);
chararray1[8]:=(int1.text);
chararray1[9]:=(cha1.text);
chararray1[10]:=(gep1.text);
chararray1[11]:=(ep1.text);
{soltle zum erstellen einer Datei sein, wo es reingeschrieben wird}
giveoutplace:=tfilestream.create('C:\Dokumente und Einstellungen\User\Desktop\Eigene Datein\Rollenspiel\unten\Abenteuerdelphi\'+Abentname+'\'+Vorname, fmOpenRead or fmShareDenyWrite);
{sollte zum einlesen n die entstandene Datei sein, is aber komplett falsch...}
giveoutplace(chararray1):='C:\Dokumente und Einstellungen\User\Desktop\Eigene Datein\Rollenspiel\unten\Abenteuerdelphi\'+Abentname+'\'+Vorname;
end;
end. |
|
so ungefähr sieht das aus.
ich möchte halt die werte alle einlesen, und dann in nem ordner als irgendeine datei speichern (ja, das müsste mir auch fehlen...^^"), sodass ich sie später wieder auslesen kann
Weil ich die Charaktere nicht alle in den gleichen Ordner packen woltle, dachte ich mir, dass ich für jeden einen neuen ordner erstelle, also dann im Ordner (...\abentname+'\'+Vorname) abspeichern.
Das ergebnis würd ich dann zu gegebener zeit gerne wieder aufrufen, aber den Teil würd ich dann alleine machen, wenn ich das hier verstanden habe
okai, also ich hoffe das ihr (die das lest [grammatisch richtig?]) das versteht und mir antworten könnt
bräuchte hilfe, die ich auch verstehe und nicht abpinsel
wenn ihr irgendwelche links postet, wo das auch erklärt ist, wär ich auch dankbar
ich bin noch nicht soweit in delphi, und wenn ich erstmal andere sachen machen soltle (im falle das ihr mich tadelt weil ich alles falsch mache und sowas...) würd ich später damit weitermachen und erstmal an anderen stellen weitermachen
aber ich woltl mir selbst ein praktisches beispiel für arrays basteln, wo ich auch verstehe weshalb dort fmOpenRead or fmShareDenyWrite steht
nun gut, jetz schonmal danke für antworten
(und bitte nicht zu sehr tadeln xD)
Halbgard
(aso, noch ein frage
alle haben delphi für win32
is es etwa nich so gut, wenn man delphi.net für windows nimmt??)
(hatte die frage eben überhaupt einen zusammenhang in sich *smilie mit fragezeichen auf dem kopf* ???) |
Zuletzt bearbeitet von Halbgard am 03.07.2008, 12:06, insgesamt 3-mal bearbeitet. |
 |
|
|
|
| |
| Khabarakh |
#2| Verfasst am: 02.07.2008, 19:15 Titel: Re: Charaktereinlesung Für D&D - stat. Array |
 |
 |
 |
|
Mitglied Alter: 19 Beiträge: 2.645 angemeldet: 18.08.2004 Wohnort: Brackenheim

|
| Halbgard hat folgendes geschrieben: | (aso, noch ein frage
alle haben delphi für win32
is es etwa nich so gut, wenn man delphi.net für windows nimmt??) | Kurz gefasst: Da du im Win32-"Stil" programmierst, macht es keinen Sinn, etwas anderes als Delphi.Win32 zu benutzen. |
 |
 |
|
|
|
| |
| mimi |
#3| Verfasst am: 02.07.2008, 21:48 Titel: Re: Charaktereinlesung Für D&D - stat. Array |
 |
 |
 |
|
aktives Mitglied Alter: 23 Status: offline Beiträge: 1.751 angemeldet: 01.12.2002 Wohnort: Oldenburg Delphi 7 Personal

|
du könntest es per Forschleife machen:
wobei wenn ich deine Variablen richtig deute könnte es so besser aussehen:
*Die anderen Felder sagen mir nix.
jetzt könntest du ihn so verwenden für deine verschiedene Charr's:
| Delphi-Quellcode: | markieren | var
CharArray1:array[0..11] of Tchararray
procedure ... begin
<- lese aus Datei ein ->
for i:=0 to 11 do begin
CharArray1[i].vorname:='Nase';
end;
end; |
|
Ich hoffe du kannst mein Beispiel nach vollziehen. Es ist nur eine Vorlage.
schau dich doch noch mal hier um:
http://www.delphi-treff.de/sprachen/object-pascal/
Später kannst du dann statt Record auch klassen nutzen. Sind viel "besser"*G*.
für das lesen aus einer Datei könntest du ganz einfach TIniFile nehmen:
Dann kannst du auch alle Charaktere in einer Datei packen mit unterschiedlichen Sektionen. und nur noch die Grafiken in unterschiedliche Ordner oder so. je nach dem. |
 MFG
Michael Springwald,
Bitte nur Deutsche Links angeben Danke (benutzte überwigend Lazarus) |
 |
|
|
|
| |
| vsilverlord |
#4| Verfasst am: 02.07.2008, 21:55 Titel: Re: Charaktereinlesung Für D&D - stat. Array |
 |
 |
 |
|
Mitglied Alter: 17 Status: offline Beiträge: 79 angemeldet: 07.01.2008 Wohnort: Baden Württemberg- Hohenlohekreis Delphi 7 Enterprise

|
Gute Idee Mimi, so würde ich das auch machen |
 ~beware
Wizards First Rule:
People are stupid; given proper motivation, almost anyone will believe almost anything. Because people are stupid, they will believe a lie because they want to believe it’s true, or because they are afraid it might be true
Zuletzt bearbeitet von vsilverlord am 02.07.2008, 21:56, insgesamt 1-mal bearbeitet. |
 |
|
|
|
| |
| DeddyH |
#5| Verfasst am: 02.07.2008, 22:08 Titel: Re: Charaktereinlesung Für D&D - stat. Array |
 |
 |
 |
|
"Rüsselmops" ;-) Alter: 42 Status: offline Beiträge: 6.654 angemeldet: 17.09.2006 Wohnort: Schweina/Thüringen Delphi 2007 Professional

|
Das könnte man IMHO auch durch FillChar bzw. ZeroMemory ersetzen |
 10 Minuten Nachdenken ersparen oftmals 10 Stunden Fehlersuche. |
 |
|
|
|
| |
| mimi |
#6| Verfasst am: 02.07.2008, 22:18 Titel: Re: Charaktereinlesung Für D&D - stat. Array |
 |
 |
 |
|
aktives Mitglied Alter: 23 Status: offline Beiträge: 1.751 angemeldet: 01.12.2002 Wohnort: Oldenburg Delphi 7 Personal

|
naja ich dachte das er dort was rein schreiben wollte. Es also nicht auf NIL setzten möchte. darum '' evlt. währe '...' besser gewesen *G* |
 MFG
Michael Springwald,
Bitte nur Deutsche Links angeben Danke (benutzte überwigend Lazarus) |
 |
|
|
|
| |
| Halbgard |
#7| Verfasst am: 03.07.2008, 06:10 Titel: Re: Charaktereinlesung Für D&D - stat. Array |
 |
 |
 |
|
gerade reingestolpert Status: offline Beiträge: 2 angemeldet: 26.06.2008

|
Cool, danke!
ich probiers dann mal aus^^ |
|
 |
|
|
|
 |
|
 |
| |
|
|
| |
 
|
|
| |
|
Du darfst keine Beiträge in dieses Forum schreiben. Du darfst auf Beiträge in diesem Forum nicht antworten. Du darfst Deine Beiträge in diesem Forum nicht bearbeiten. Du darfst Deine Beiträge in diesem Forum nicht löschen. Du darfst an Umfragen in diesem Forum nicht mitmachen. Du kannst Dateien in diesem Forum nicht posten. Du kannst Dateien in diesem Forum nicht herunterladen.
|
|
 |