Har idag gett mig in på att göra ett enkelt litet program i Delphi.
Det är första gången jag testar Delphi
Det är ett litet program där jag presenterar ett "paket" man kan köpa.
Man kan ändra paketets innehåll genom välja olika alternativ i ett antal comboboxar.
Priset för paketet ändras beroende på vilka val man gör i komboboxarna.
Fråga1:
Jag har längst ner i formuläret en label som ska visa totalsumman för paketet. Den ska ändras automatiskt när man byter innehåll i paketet.
Jag har försökt att använda mig av SelectedIndexChanged under "Events" för comboboxen men jag får inte till det.
Fråga2:
Kan man på något sätt skriva ut eller skriva till fil de val man gjort och totalsumman som en slags offert?
Här kommer koden till formuläret:
using System;
using System.Drawing;
using System.Collections;
using System.ComponentModel;
using System.Windows.Forms;
using System.Data;
namespace Datapaket
{
public class WinForm : System.Windows.Forms.Form
{
private System.ComponentModel.Container components = null;
private System.Windows.Forms.ComboBox Grafikkort;
private System.Windows.Forms.Label sumGrafikkort;
private System.Windows.Forms.Label totSumma;
public WinForm()
{
InitializeComponent();
}
protected override void Dispose(bool disposing)
{
if (disposing)
{
if (components != null)
{
components.Dispose();
}
}
base.Dispose(disposing);
}
#region Windows Form Designer generated code
private void InitializeComponent()
{
System.Resources.ResourceManager resources = new System.Resources.ResourceManager(typeof(WinForm));
this.Grafikkort = new System.Windows.Forms.ComboBox();
this.sumGrafikkort = new System.Windows.Forms.Label();
this.totSumma = new System.Windows.Forms.Label();
this.SuspendLayout();
// Grafikkort
this.Grafikkort.Items.AddRange(new object[] {
"val 1 + 500 kr",
"val 2 + 1.000 kr"});
this.husval.Location = new System.Drawing.Point(312, 56);
this.husval.Name = "Grafikkort";
this.husval.Size = new System.Drawing.Size(120, 21);
this.husval.TabIndex = 0;
this.husval.Text = ""default + 0 kr"";
// sumGrafikkort
this.label1.Location = new System.Drawing.Point(24, 152);
this.label1.Name = "sumGrafikkort";
this.label1.Size = new System.Drawing.Size(96, 16);
this.label1.TabIndex = 1;
this.label1.Text = "+0 kr";
// label2
this.label2.Font = new System.Drawing.Font("Microsoft Sans Serif", 8.25F, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
this.label2.Location = new System.Drawing.Point(24, 120);
this.label2.Name = "totSumma";
this.label2.Size = new System.Drawing.Size(104, 16);
this.label2.TabIndex = 2;
this.label2.Text = "10.000 kr";
// WinForm
this.AutoScaleBaseSize = new System.Drawing.Size(5, 13);
this.BackColor = System.Drawing.SystemColors.Window;
this.ClientSize = new System.Drawing.Size(464, 750);
this.Controls.Add(this.totSumma);
this.Controls.Add(this.Grafikkort);
this.Controls.Add(this.sumGrafikkort);
this.Name = "WinForm";
this.Text = "Test";
this.ResumeLayout(false);
}
#endregion
[STAThread]
static void Main()
{
Application.Run(new WinForm());
}
}
}