Hallo Raiden,
erstmal willkommen in der Delphi-PRAXiS.
Deine Anfrage nach einer fertigen Lösung geht jedoch am Sinn und Zweck dieses Forums vorbei: Wir können Dir gerne die Richtung weisen, in der Du eine brauchbare (und für Dich zu realisierende) Lösung finden wirst und wir werden Dir auf Deinem Weg dorthin auch gerne jegliche Fragen dazu beantworten. Aber solche "Auftragsarbeiten" im Stil von wirst Du hier nicht loswerden können.
Davon einmal abgesehen: Selbst wenn Du eine fertige Lösung erhalten solltest, so würdest Du damit bei der Präsentation in Deiner Schule u.U. nicht viel anfangen können - spätestens in dem Moment, in dem Dich Dein Lehrer nach Details fragt, landest Du unsanft auf dem Bauch (wahlweise auch auf der Nase).
Daniel R. Wolf
mit Grüßen aus Hamburg