AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Lazarus (IDE) Abschlussarbeit 12. Klasse Informatik - Quiz
Thema durchsuchen
Ansicht
Themen-Optionen

Abschlussarbeit 12. Klasse Informatik - Quiz

Ein Thema von LeonPP · begonnen am 17. Nov 2015 · letzter Beitrag vom 17. Nov 2015
 
LeonPP

Registriert seit: 9. Nov 2015
5 Beiträge
 
#1

Abschlussarbeit 12. Klasse Informatik - Quiz

  Alt 17. Nov 2015, 12:40
Guten Tag alle samt ,

ich bin jetzt schon seit einigen wochen auf der suche nach tipps und Hilfestellungen
bezüglich meiner Abschlussarbeit, dem Quiz, welche ich mit der Lazarus IDE programmieren will.

Da ich mich sehr gerner mit Bildbearbeitungsprogrammen und dem erstellen von grafiken interessiere haben ich Anfangs
nur am Design meines Programmes gearbeitet. Nun bin ich am Punkt angekommen an dem es für mich persönlich ziemlich schwierig
ist. Ich muss dazu sagen das ich erst seit Anfang der 12. Klasse mit Lazarus und Programmieren im Allgemeinen konfrontiert geworden bin, d.h.
Bisher haben wir einen kleinen Taschenrechner programmiert mit den Grundfunktionen sprich +, -.* und /.
Wir sollten uns für unsere Abschlussarbeit ein Fach aussuchen und uns vom Lehrer ein Thema geben lassen welches im meinem Fall das erstellen
eines Multiple Choice Quiz ist (inkl. Anleitung für Lehrer). Um auf meine eigentliche Frage zurückzukommen ...


-> Wie benutze oder baue ich INI Files in mein Quiz ein?

Ich hab schon 'ne menge Seiten abgeklappert aber alles war ziemlich Unverständlich für mich, deshalb wende ich mich jetzt an euch

Hoffe ihr könnt mir ein paar Tipps geben (Ich will keine Lösungen, nur Ansätze ^^)

Danke im vorraus!
LeonPP

UNIT1:
Delphi-Quellcode:
unit Unit1;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls,
  StdCtrls, unit2, Windows
;

type

  { TForm1 }

  TForm1 = class(TForm)
    Bg: TImage;
    HP: TImage;
    Start: TImage;
    Beenden: TImage;
    procedure BgClick(Sender: TObject);
    procedure BeendenClick(Sender: TObject);
    procedure HPClick(Sender: TObject);
    procedure StartClick(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.BeendenClick(Sender: TObject);
begin
  Form1.Close;
end;

procedure TForm1.HPClick(Sender: TObject);
begin
  ShellExecute(Handle, 'OPEN', 'http://www.****.de', nil, nil,SW_SHOWNORMAL);
  {öffnet Internetadresse im Browser}
end;

procedure TForm1.StartClick(Sender: TObject);
begin
  Form1.Hide;
  Form2.Show;
end;

end.
Angehängte Grafiken
Dateityp: jpg Bg.jpg (85,6 KB, 43x aufgerufen)

Geändert von LeonPP (17. Nov 2015 um 12:42 Uhr)
  Mit Zitat antworten Zitat
 

 

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:26 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz