Zitat von
o0o:
[Error] Unit1.pas(14): Unsatisfied forward or external declaration: 'TForm1.Button1Click'
Das kommt, weil du im Interface noch eine Defintion von Button1Click hast, aber den nicht in der Implementation implementiert hast. Du musst also entweder Button1Click implementieren oder aus dem Interface-Teil löschen.
Zitat von
o0o:
[Error] Unit1.pas(69): Incompatible types: 'String' and 'TStrings'
Der zweite Fehler kommt davon, dass du findnumlength mit den falschen Parameter aufrufst. Die Prozedur erwartet midestens zwei und du hast nur ein TStrings Objekt für den ersten Parameter angegeben, wobei da der input String hingehört, und somit sagt Delphi das du versuchst ein TStrings Objekt in einen String zu quetschen. Die Lösung ist simpel: Gib beide Parameter an. Erst den Input, dann die TStrings (Memo1.Lines).
Hoffe geholfen zu haben.
[EDIT] 1. Zweiten Fehler erkannt 2. Schlusswort verschoben [/EDIT]