Delphi-PRAXiS :: Das Forum für Fragen zu Delphi
Das Experten Forum für Delphi Programmierer
Hilfe für Borland Delphi gibts es hier im Forum
Delphi Quelltexte und Source Codes
 
Delphi-PRAXiS :: Foren-ÜbersichtForen-Übersicht Delphi-PRAXiS Modul-ÜbersichtSite-Map Delphi-PRAXiS durchsuchenSuchen Delphi-PRAXiS Code-LibraryCode-Library Jetzt registrieren!Registrieren Login  
   
 
0
 
Delphi für Win32
Charaktereinlesung Für D&D - stat. Array
Ein Delphi (Win32)-Thema von Halbgard.

Vorheriges Thema anzeigen  |  Nächstes Thema anzeigen
Neuen Beitrag schreiben Auf Beitrag antworten
als PDF-Datei herunterladenThema ausdrucken
 
Delphi-PRAXiS Forum - Übersicht -> Multimedia
Seite 1 von 1   [ 7 Beiträge ]  
 
 Autor 
 Nachricht 
 
Halbgard #1|Beitrag #911485Verfasst am: 02.07.2008, 17:56      Titel: Charaktereinlesung Für D&D - stat. Array Antworten mit Zitat
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 Smile

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
{$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 Smile

okai, also ich hoffe das ihr (die das lest [grammatisch richtig?]) das versteht und mir antworten könnt Smile
bräuchte hilfe, die ich auch verstehe und nicht abpinsel Smile
wenn ihr irgendwelche links postet, wo das auch erklärt ist, wär ich auch dankbar Smile

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.
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
 
Khabarakh #2|Beitrag #911512Verfasst am: 02.07.2008, 19:15      Titel: Re: Charaktereinlesung Für D&D - stat. Array Antworten mit Zitat
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.

Wikia
89.246.171.32 deleted http://www.bild.de from the result nachrichten 2 minutes ago
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
 
mimi #3|Beitrag #911571Verfasst am: 02.07.2008, 21:48      Titel: Re: Charaktereinlesung Für D&D - stat. Array Antworten mit Zitat
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:
Delphi-Quellcode: markieren
for i:=0 to 11 do begin
    chararray1[i]:=''
  end;

wobei wenn ich deine Variablen richtig deute könnte es so besser aussehen:
Delphi-Quellcode: markieren
type
  Tchararray = record
    vorname, nachname:String;
    ...*
  end;


*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)
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
 
vsilverlord #4|Beitrag #911576Verfasst am: 02.07.2008, 21:55      Titel: Re: Charaktereinlesung Für D&D - stat. Array Antworten mit Zitat
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.
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
 
DeddyH #5|Beitrag #911582Verfasst am: 02.07.2008, 22:08      Titel: Re: Charaktereinlesung Für D&D - stat. Array Antworten mit Zitat
"Rüsselmops" ;-)
Alter: 42
Status: offline
Beiträge: 6.654
angemeldet: 17.09.2006
Wohnort: Schweina/Thüringen
Delphi 2007 Professional

Zitat:
Delphi-Quellcode: markieren
for i:=0 to 11 do begin
    chararray1[i]:=''
  end;

Das könnte man IMHO auch durch FillChar bzw. ZeroMemory ersetzen Wink

10 Minuten Nachdenken ersparen oftmals 10 Stunden Fehlersuche.
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
 
mimi #6|Beitrag #911593Verfasst am: 02.07.2008, 22:18      Titel: Re: Charaktereinlesung Für D&D - stat. Array Antworten mit Zitat
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)
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
 
Halbgard #7|Beitrag #911675Verfasst am: 03.07.2008, 06:10      Titel: Re: Charaktereinlesung Für D&D - stat. Array Antworten mit Zitat
gerade reingestolpert
Status: offline
Beiträge: 2
angemeldet: 26.06.2008


Cool, danke! Smile

ich probiers dann mal aus^^
nach oben nach unten
Benutzer-Profile anzeigen Private Nachricht senden
Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen im Forum zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Google zu suchen. Markiere Begriffe im Text und klicke auf diesen Button, um nach zusätzlichen Informationen bei Wikipedia zu suchen.
 
Anzeige-Optionen:    
 
Delphi-PRAXiS Forum - Übersicht -> Multimedia Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1   [ 7 Beiträge ]  
 
  Neuen Beitrag schreiben Auf Beitrag antworten
als PDF-Datei herunterladenThema ausdrucken
 
   
Gehe zu:  
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.


Impressum / Kontakt
Allgemeine Geschäftsbedingungen
Verhaltenskodex & FAQ

Delphi-PRAXiS :: Das Forum für Delphi-Programmierer
Das Experten Forum für Delphi ProgrammiererHilfe für Borland Delphi gibts es hier im ForumDelphi Quelltexte und Source CodesDelphi-PRAXiS :: Das Forum für DelphiWindows APIInternet und NetzwerkeVCL und Datenbanken
 

Delphi-PRAXiS V.2005 III
© 2002-2008 by Daniel R. Wolf
powered by phpBB © phpBB Group

Impressum / Kontakt Allgemeine Geschäftsbedingungen