Deutsches Lazarusforum

Ja, danke das war der Fehler.

Hallo,

wir haben in der Schule vor kurzem mit dem Thema objektorientierte Modellierung angefangen und sollten jetzt ein Programm mit einer Klasse für Brüche erstellen.
Bei mir tritt dabei allerdings (malwieder :D) eine Fehlermeldung mit dem Inhalt "External SIGSEGV" auf. Ich habe mich zu dieser ...

Der Fall für Zähler 0 kommt nicht in diese Rechnung hinien. In dem Fall hätte ich bereits die Nullstelle gefunden und bräuchte kein Newton-Verfahren mehr verwenden.

Danke, so funktioniert es!

Hallo,

Ich habe angefangen ein Programm zu schreiben, welches mir für ein Polynow 7ten Grades eine Kurvendiskussion durchführt. An einem Schritt in der Newton-Methode zur Annäherung der Nullstellen scheitert das Programm doch.

Es kommt die Fehlermeldung EXTERNAL SIGPFE . Dabei wird die folgende ...

ok, vielen Dank,

ja,
for x:= 1 to length(Text) do

hatte ich wohl nach dem kopieren aus dem anderen Programm, wo es herkam nicht geändert.

Und der Programmierstil liegt an meiner nicht allzu großen Erfahrung mit dem Programmieren und dem noch grauenvolleren Stil, den die Lehrer in der Schule ...

for x:= 1 to length(Text) do
begin
BuchstabeANSI:= ORD(Crypttext.Lines.Text[x]);

x ist mit der Länge des Textes begrenzt, kann also nicht zu groß sein.

TForm1 = class(TForm)
BtEncrypt: TButton;
Crypttext: TMemo;
Encrypted: TMemo;

Crypttext ist im Objektinspektor und im Quelltext ...

Hallo,

ich habe ein einfaches Entschlüsslungsprogramm für Caesar Verschlüsslung o.ä. nach Buchstabenhäufigkeit programmiert.

Sobald ich allerdings den Button klicke, der den Text entschlüsseln soll, taucht ein ERROR mit External: SIGSEGV auf.

Dabei wird folgende Quellcode-Zeile markiert ...

Ich glaube die einfachste Lösung (so hab ich es jetzt gemacht) ist, wenn in dem Formular noch nicht allzu viel drin ist einfach das Formular zu löschen und ein neues zu erzeugen, in das dann alles übertragen wird. (Von Hand :/)

program project1;

Ne, hier ist dieser Teil vorhanden :/
Hatte ich auch extra nachgeschaut.
Was mich wundert ist, dass die Zeile mit Visible makiert wurde.

{$mode objfpc}{$H+}

uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset ...

Und schon ist das nächste Problem entstanden -.-
Tut mir Leid, wenn ich zu dumme Fehler mache.

Ich habe inzwischen Form2 zur Mainform gemacht und alles funktionierte wie gehabt.
Dann habe ich eine dritte Form erzeugt, auf die ich auch von Form2 as zugreifen will.

procedure TForm2.BtZufallClick ...

Danke, das war der Fehler

Erstmal danke :) Problem gelöst.
Aber neues Problem entstanden :/

Ich wollte jetzt mit einem Button das ganze in die andere Richtung machen:

procedure TForm2.Button1Click(Sender: TObject);
begin
Close;
Form1.show;
end;

Dabei ist aber folgender Error entstanden.
Identifier not found "Form1"

Ok, erstmal danke für die schnelle antwort.

Ja daran könnte es liegen. Ich probiere es mal aus.
Wäre ich nicht drauf gekommen

Hallo erstmal,

ich weiß, dass es zu diesem Thema bereits sehr viele Fragen gibt, aber nichtmal nach 2 Stunden Suche im Internet und ausprobieren, funktioniert es bei mir nicht.

Also: Ich habe eine Form1: Ich möchte, dass wenn ich hier auf den Button BtMenue Klicke eine zweite Form (Form2) geöffnet ...