//Lendo array multidimensional de
string
//e Exibindo num textBox Com quebra de
linhas
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using System.IO;
namespace keypress {
public partial class Form1 : Form {
public
System.Windows.Forms.TextBox textBox;
public
System.Windows.Forms.Label label_1;
/*============================================================*/
public void Ini_Array ( ) {
textBox = new
System.Windows.Forms.TextBox ( );
label_1 = new
System.Windows.Forms.Label ( );
int i, j = 0;
string [ , ] texto = {
{ "
\n"},
{"Debaixo dumas mui formosas
tamareiras, \n"},
{"Estando já Berseba na escuridão. \n"},
{"As aves escutando, entre as
roseiras, \n"},
{"Se vê andar o patriarca Abraão. \n"},
{"Seu coração perante Deus está
aflito, \n"},
{"Pois quer que O sirvamos sem
murmuração; \n"},
{"E por amor pergunta ao Senhor
bendito: \n"},
{"O meu amado filho queres Tu,
então? \n"},
{"
\n"},
{"A voz de Jeová potente é
ouvida: \n"},
{"O teu Isaque oferece para
Mim, \n"},
{"Embora fiques com tu'alma
dolorida, \n"},
{"Pois te abençoo se fizeres tu
assim. \n"},
{"De abatido Abraão se torna
forte \n"},
{"E Canta hinos, pois com fé
medita já: \n"},
{"Deus pode o meu filho libertar
da morte! \n"},
{"E não temendo, segue para Moriá. \n"},
{"
\n"},
{"Ao pé do monte do supremo
sacrifício, \n"},
{"Profunda duvida entrou em Abraão: \n"},
{"Irei perder da minha vida o
beneficio? \n"},
{"E triste começou subir com
lentidão, \n"},
{"Pois ia dar, do coração a
esperança \n"},
{"- No seu outono, sacrifício
duma flor,& \n"},
{"Assim levou o seu cordeiro à
matança, \n"},
{"Em obediência ao mandato do
Senhor. \n"},
{" \n"},
{"Isaque com a lenha, presto vai
na frente, \n"},
{"Oh! Quanto é formoso para Abraão! \n"},
{"Mas eis que volta p'ra seu pai
suavemente \n"},
{"E lhe dirige esta interrogação: \n"},
{"O fogo e a lenha estou vendo
que trouxemos, \n"},
{"Mas o cordeiro d'holocausto
onde está? \n"},
{"E a resposta de Abraão na Bíblia
temos: \n"},
{"Meu filho,
Deus pra Si, Cordeiro proverá \n"},
{"
\n"},
{"Chegando Abraão aonde Deus
mandara, \n"},
{"Fez um altar e nele a lenha
arrumou: \n"},
{"E a seu filho, que já dantes
amarrara, \n"},
{"Tomando nos seus braços sobre o
altar deitou\n"},
{"Mas quando Abraão foi para imolá-lo, \n"},
{"O Anjo do Senhor bradou-lhe
desde os céus: \n"},
{"A tua mão, ó não estendas p'ra
matá-lo; \n"},
{"Porquanto eu agora sei que
temes Deus. \n"},
{" \n"},
{"Erguendo Abraão seus olhos de
repente, \n"},
{"Vê um cordeiro, que no mato
preso está, \n"},
{"E o tomando, oferece-o
alegremente; \n"},
{"Assim No monte do Senhor se
proverá. \n"},
{"A voz do Anjo é ouvida
novamente; \n"},
{"Diz o Senhor: Porque fizeste
esta ação, \n"},
{"Deveras, Eu abençoarei a tua
semente, \n"},
{"E nela, as nações benditas se
farão. \n"},
{"
\n"},
{"O nosso Isaque oferecemos com
firmeza \n"},
{"No Moriá onde finda o
ideal, \n"},
{"Pois foi ali que alcançaram
fortaleza, \n"},
{"Os vencedores, sob canto
angelical; \n"},
{"Ali, o nosso Deus jurou
fidelidade, \n"},
{"Também os santos se encheram de
valor, \n"},
{"E só teremos a perfeita
santidade, \n"},
{"Depois que formos para o monte
do Senhor \n"}};
for ( i = 0; i < texto.Length; i++ ) {
textBox.Text += texto [ i, j ] + "\r\n" + "\t";
}
}
/*============================================================*/
public void text_Box ( ) {
textBox.ForeColor = Color.Black;
textBox.Multiline = true;
textBox.ScrollBars =
ScrollBars.Vertical;
//textBox.BackColor = Color.Black;
textBox.Size = new System.Drawing.Size (
565, 210 );
textBox.Location = new Point ( 10, 40 );
textBox.Font = new Font ( "Times New
Roman",
12F,
System.Drawing.FontStyle.Bold,
System.Drawing.GraphicsUnit.Point, 0 );
//Colororindo a font do texttBox com rgb
// textBox.ForeColor = Color.FromArgb ( 255,
0, 255 );
}
/*============================================================*/
protected override void OnPaint (
PaintEventArgs e ) {
this.Size = new System.Drawing.Size ( 600, 300 );
this.Text = "Array multidimensional de
string";
this.BackColor = Color.LightBlue;
Graphics dc = e.Graphics;
Pen BluePen = new Pen ( Color.Red, 10
);
dc.DrawRectangle ( BluePen, 5, 5,
575, 250 );
Font myFont = new System.Drawing.Font (
"Helvetica", 12,
FontStyle.Italic );
Brush myBrush = new SolidBrush (
System.Drawing.Color.Black );
dc.DrawString ( "Array
multidimensional de string",
myFont, myBrush, 180, 15 );
}
/*============================================================*/
public Form1 ( ) {
Ini_Array ( );
text_Box ( );
this.Controls.Add ( this.textBox );
}
/*============================================================*/
}
static class Program {
/// <summary>
/// The main entry point
for the application.
/// </summary>
[STAThread]
static void Main ( ) {
Application.EnableVisualStyles ( );
Application.SetCompatibleTextRenderingDefault ( false );
Application.Run ( new Form1 ( ) );
}
}
}
Nenhum comentário:
Postar um comentário