SongBeamer Makros

[Gabriel]

Hallo,

ich wollte ein kleines Makro für SongBeamer schreiben, das wir bei uns in der Gemeinde brauchen könnten. Ich kenne mich zwar mit Delphi etwas aus, habe aber noch nie Konsolenanwendungen geschrieben. Die Anfänge klappen ganz gut, aber sobald ein Array ins Spiel kommt, bekomme ich eine Fehlermeldung. Packt SongBeamer-Makro einfach (noch) keine Arrays oder ist das auf einen Fehler meinerseits zurückzuführen?

Sorry, wenn ich da irgendeinen groben Denkfehler drin hab, das ist für mich Neuland .

Gruß,
Gabriel

[Sebastian]

Also Arrays sollten eigentlich funktionieren. Beispiel:

Code: Alles auswählen

var
  IntArray: array[0..2] of Integer;
  Names: array[0..1] of String;
  Summe: Integer;
  I: Integer;
  
begin
  IntArray[0] := 5;
  IntArray[1] := 8;
  IntArray[2] := 6;
  
  Summe := 0;
  for i := 0 to High(IntArray) do
    Inc(Summe, IntArray[I]);
  
  ShowMessage(Format('Die Summe ist: %d', [Summe]));
  
  Names[0] := InputBox('String Array Demo', 'Name 1:', 'Max');
  Names[1] := InputBox('String Array Demo', 'Name 2:', '');
  
  ShowMessage(Format('Die Namen sind: %s, %s', [Names[0], Names[1]]));
end.

[Gabriel]

Danke!! Das hat mir wieder Mut gemacht weiterzuprobieren .

Der Fehler lag wohl nicht direkt am Array, sondern daran, dass wenn einmal ein Fehler mit einem Array aufgetaucht ist der Fehler dann immer bei einem Array kam bis zum SongBeamer-Neustart (Gleiches Script - einmal kommt eine Fehlermeldung, nach dem Neustart geht's). Ist aber irgendwie nicht gezielt reproduzierbar.

Egal, damit bin ic hjetzt schon (fast) am Ziel. Letztes Problem siehe neues Thema.